diff options
| author | Richard M. Stallman | 1997-06-17 21:51:35 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-06-17 21:51:35 +0000 |
| commit | b32410669ed3325bd35fbd3753924a9ac7e6cac4 (patch) | |
| tree | 5e65b889f68ac50805c8633af6fdd631dbfb430c /lisp | |
| parent | 44a0dbd7cdc8e446b366c58117b403d1a502fece (diff) | |
| download | emacs-b32410669ed3325bd35fbd3753924a9ac7e6cac4.tar.gz emacs-b32410669ed3325bd35fbd3753924a9ac7e6cac4.zip | |
(finder-list-keywords): Create *Finder* buffer if nec.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/finder.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/finder.el b/lisp/finder.el index 799a681418c..13cedc683a5 100644 --- a/lisp/finder.el +++ b/lisp/finder.el | |||
| @@ -174,7 +174,7 @@ arguments compiles from `load-path'." | |||
| 174 | (interactive) | 174 | (interactive) |
| 175 | (if (get-buffer "*Finder*") | 175 | (if (get-buffer "*Finder*") |
| 176 | (pop-to-buffer "*Finder*") | 176 | (pop-to-buffer "*Finder*") |
| 177 | (pop-to-buffer (set-buffer "*Finder*")) | 177 | (pop-to-buffer (set-buffer (get-buffer-create "*Finder*"))) |
| 178 | (finder-mode) | 178 | (finder-mode) |
| 179 | (setq buffer-read-only nil) | 179 | (setq buffer-read-only nil) |
| 180 | (erase-buffer) | 180 | (erase-buffer) |