Mercurial > emacs
changeset 3629:58add805382e
(append-to-buffer): Interactively, supply all 3 args.
Allow nonexistent buffers.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 10 Jun 1993 23:06:50 +0000 |
| parents | 3f0d7802decb |
| children | 68ed205fc50e |
| files | lisp/simple.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/simple.el Thu Jun 10 23:04:01 1993 +0000 +++ b/lisp/simple.el Thu Jun 10 23:06:50 1993 +0000 @@ -1194,7 +1194,8 @@ BUFFER (or buffer name), START and END. START and END specify the portion of the current buffer to be copied." (interactive - (list (read-buffer "Append to buffer: " (other-buffer nil t) t))) + (list (read-buffer "Append to buffer: " (other-buffer nil t)) + (region-beginning) (region-end))) (let ((oldbuf (current-buffer))) (save-excursion (set-buffer (get-buffer-create buffer))