lisp/ffap.el: Fix reference to variable thing-at-point-default-mail-uri-scheme.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7cbf733b45f2e37d860d53ed1047813198e15ee6..39018853285d50b4025cff98634ce010ad8a669c 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-08-09  Juanma Barranquero  <lekktu@gmail.com>
+
+       * ffap.el (ffap-url-at-point): Fix reference to variable
+       thing-at-point-default-mail-uri-scheme.
+
 2013-08-09  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * subr.el (define-error): New function.

diff --git a/lisp/ffap.el b/lisp/ffap.el
index ee0b87e8f8740c94ac3c5373e74d7512063a9cb6..737de8b59911274da1b08035e4d18c7bb946249c 100644 (file)
--- a/lisp/ffap.el
+++ b/lisp/ffap.el
@@ -1073,7 +1073,7 @@ Assumes the buffer has not changed."
     (or (and (eq major-mode 'w3-mode) ; In a w3 buffer button?
             (w3-view-this-url t))
        (let ((thing-at-point-beginning-of-url-regexp ffap-url-regexp)
-             (thing-at-point-default-mail-scheme ffap-foo-at-bar-prefix))
+             (thing-at-point-default-mail-uri-scheme ffap-foo-at-bar-prefix))
          (thing-at-point-url-at-point t
                                       (if (use-region-p)
                                           (cons (region-beginning)