diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2008-02-05 11:51:30 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2008-02-05 11:51:30 +0000 |
| commit | 9b9a412286efca8257d18175941b6370115445d6 (patch) | |
| tree | a0e0d4c08cab2e11fb06defb4d98601e071641f0 /lisp/ffap.el | |
| parent | a7d51a21fbd78c6947e05f703ef2720bef556dee (diff) | |
| download | emacs-9b9a412286efca8257d18175941b6370115445d6.tar.gz | |
*** empty log message ***
Diffstat (limited to 'lisp/ffap.el')
| -rw-r--r-- | lisp/ffap.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ffap.el b/lisp/ffap.el index 3e62f2351c6..aaf92ebe306 100644 --- 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 |