diff options
| author | Chong Yidong | 2012-12-06 11:04:21 +0800 |
|---|---|---|
| committer | Chong Yidong | 2012-12-06 11:04:21 +0800 |
| commit | e1d51545ced3cf6f58c44891563dfaf62c34b411 (patch) | |
| tree | 3c5e79c5687fc5b7aed5d9116c7d4830fe91e57a /lisp | |
| parent | 1df7defd8040839a81909b0eb8f428f6158b2362 (diff) | |
| download | emacs-e1d51545ced3cf6f58c44891563dfaf62c34b411.tar.gz emacs-e1d51545ced3cf6f58c44891563dfaf62c34b411.zip | |
* ffap.el (ffap-replace-file-component): Fix typo.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/ffap.el | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5712dd9f8c9..a4f40e6a80d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2012-12-06 Chong Yidong <cyd@gnu.org> | ||
| 2 | |||
| 3 | * ffap.el (ffap-replace-file-component): Fix typo. | ||
| 4 | |||
| 1 | 2012-12-05 Stefan Monnier <monnier@iro.umontreal.ca> | 5 | 2012-12-05 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 6 | ||
| 3 | * progmodes/octave-mod.el (octave-mark-block): Move out of tokens and | 7 | * progmodes/octave-mod.el (octave-mark-block): Move out of tokens and |
diff --git a/lisp/ffap.el b/lisp/ffap.el index 4c75609fe01..0620cd8cc19 100644 --- a/lisp/ffap.el +++ b/lisp/ffap.el | |||
| @@ -484,7 +484,7 @@ Returned values: | |||
| 484 | "In remote FULLNAME, replace path with NAME. May return nil." | 484 | "In remote FULLNAME, replace path with NAME. May return nil." |
| 485 | ;; Use efs if loaded, but do not load it otherwise. | 485 | ;; Use efs if loaded, but do not load it otherwise. |
| 486 | (if (fboundp 'efs-replace-path-component) | 486 | (if (fboundp 'efs-replace-path-component) |
| 487 | (funcall efs-replace-path-component fullname name) | 487 | (funcall 'efs-replace-path-component fullname name) |
| 488 | (and (stringp fullname) | 488 | (and (stringp fullname) |
| 489 | (stringp name) | 489 | (stringp name) |
| 490 | (concat (file-remote-p fullname) name)))) | 490 | (concat (file-remote-p fullname) name)))) |