*** empty log message ***

[gnu-emacs] / lisp / ffap.el

diff --git a/lisp/ffap.el b/lisp/ffap.el
index 9d3b2142f39c953ff36d7abb5b6eae69849256b7..078de992ab43b1e66a9668e212bab358a6d11454 100644 (file)
--- a/lisp/ffap.el
+++ b/lisp/ffap.el
@@ -426,7 +426,7 @@ Returned values:
   ;; (ffap-machine-p "mathcs" 5678 nil 'ping)
   ;; (ffap-machine-p "foo.bonk" nil nil 'ping)
   ;; (ffap-machine-p "foo.bonk.com" nil nil 'ping)
-  (if (or (string-match "[^-[:alnum:].]" host) ; Illegal chars (?)
+  (if (or (string-match "[^-[:alnum:].]" host) ; Invalid chars (?)
          (not (string-match "[^0-9]" host))) ; 1: a number? 2: quick reject
       nil
     (let* ((domain
@@ -960,6 +960,7 @@ If t, `ffap-tex-init' will initialize this when needed.")
   "A list of directories to look for RFC files.
 If a given RFC isn't in these then `ffap-rfc-path' is offered."
   :type '(repeat directory)
+  :version "23.1"
   :group 'ffap)
 
 (defvar ffap-rfc-path