Re: Another issue with thingatpt

[Andreas Roehler]

Employing the forms below together with standard
thingatpt-function I see several advantages

- url-at-point don't need longer a complicated
 regexp-corpus, the whole special handling of urls can
 be dropped

- it don't make more specifications than RFC3986; which
 may help to avoid trouble in the future, if new url
 schemes may be invented

- easy to read and understand from the users side,
 better to extend and maintain


(put 'url 'beginning-op
    (lambda ()
      (skip-chars-backward ":/address@hidden&'()*+,;=[:alnum:]-._~")
))

(put 'url 'end-op
    (lambda ()
           (skip-chars-forward ":/address@hidden&'()*+,;=[:alnum:]-._~")))

Already implemented it into thingatpt-utils.el, which
is available at gnu.emacs.sources.

__
Andreas Roehler