Mercurial > emacs
changeset 13896:d23e1ac7b432
Doc fixes.
(ff-get-file): Use get-file-buffer to avoid false match.
(ff-switch-to-buffer): Rename arg FILE to BUFFER-OR-NAME.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 31 Dec 1995 00:10:18 +0000 |
| parents | 0c12b3398d37 |
| children | 1960e2c77da7 |
| files | lisp/find-file.el |
| diffstat | 1 files changed, 8 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/find-file.el Sat Dec 30 19:52:40 1995 +0000 +++ b/lisp/find-file.el Sun Dec 31 00:10:18 1995 +0000 @@ -516,8 +516,8 @@ ((not filename) nil) - ((bufferp (get-buffer filename)) - (ff-switch-to-buffer filename other-window) + ((bufferp (get-file-buffer filename)) + (ff-switch-to-buffer (get-file-buffer filename) other-window) filename) ((file-exists-p filename) @@ -643,7 +643,7 @@ found)) (defun ff-string-match (regexp string &optional start) - "Like string-match (which see), but set `case-fold-search' temporarily. + "Like `string-match', but set `case-fold-search' temporarily. The value used comes from `ff-case-fold-search'." (let ((case-fold-search ff-case-fold-search)) (if regexp @@ -667,7 +667,7 @@ (defun ff-treat-as-special () "Returns the file to look for if the construct was special, else nil. -The construct is defined in the variable `ff-special-constructs' (which see)." +The construct is defined in the variable `ff-special-constructs'." (let* (fname (list ff-special-constructs) (elem (car list)) @@ -735,17 +735,17 @@ (run-hooks 'ff-post-load-hooks))) (defun ff-find-file (file &optional in-other-window new-file) - "Like `find-file' (which see), but may put the file in another window." + "Like `find-file', but may show the file in another window." (ff-switch-file 'find-file 'find-file-other-window file in-other-window new-file)) -(defun ff-switch-to-buffer (file &optional in-other-window) - "Like `switch-to-buffer' (which see), but may put the buffer in another window." +(defun ff-switch-to-buffer (buffer-or-name &optional in-other-window) + "Like `switch-to-buffer', but may show the buffer in another window." (ff-switch-file 'switch-to-buffer 'switch-to-buffer-other-window - file in-other-window nil)) + buffer-or-name in-other-window nil)) (cond ((ff-emacs-19)