(opt (group (: ":" (+ digit))))
(opt (group (: "/"
(opt
- (* (any alnum "-/.,#:%=&_?~@"))
- (any alnum "-/#:%=&_~@")))))))
+ (* (any alnum "-/.,#:%=&_?~@+"))
+ (any alnum "-/#:%=&_~@+")))))))
"Imperfect regex used to find URLs in plain text.")
(defun lurk-click-url (button)