Mercurial > emacs
changeset 8998:25406f41c336
(insert-buffer): Default to first buffer other than current one.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 22 Sep 1994 07:22:46 +0000 |
| parents | 6616ea991c4a |
| children | c3a04b8a2786 |
| files | lisp/simple.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/simple.el Thu Sep 22 06:55:11 1994 +0000 +++ b/lisp/simple.el Thu Sep 22 07:22:46 1994 +0000 @@ -1230,7 +1230,9 @@ Puts mark after the inserted text. BUFFER may be a buffer or a buffer name." (interactive (list (progn (barf-if-buffer-read-only) - (read-buffer "Insert buffer: " (other-buffer) t)))) + (read-buffer "Insert buffer: " + (other-buffer (current-buffer) t) + t)))) (or (bufferp buffer) (setq buffer (get-buffer buffer))) (let (start end newmark)