Made ffap-url-p a defun instead of a defsubst

* lisp/ffap.el (ffap-url-p): Change from defsusbt to defun,
since there doesn't seem to be much of a reason for it to be a
defsubst (bug#18203).

diff --git a/lisp/ffap.el b/lisp/ffap.el
index 8d3f8bfc37dcaae730a235fb40860b5c55ca0557..037b978b6fb42e634cd28c40736ac2f7040a56b4 100644 (file)
--- a/lisp/ffap.el
+++ b/lisp/ffap.el
@@ -570,7 +570,7 @@ Looks at `ffap-ftp-default-user', returns \"\" for \"localhost\"."
 (defvaralias 'ffap-newsgroup-heads  'thing-at-point-newsgroup-heads)
 (defalias 'ffap-newsgroup-p 'thing-at-point-newsgroup-p)
 
-(defsubst ffap-url-p (string)
+(defun ffap-url-p (string)
   "If STRING looks like an URL, return it (maybe improved), else nil."
   (when (and (stringp string) ffap-url-regexp)
     (let* ((case-fold-search t)