diff options
| author | Richard M. Stallman | 1994-11-22 19:19:42 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-11-22 19:19:42 +0000 |
| commit | 5d771766ab10a84bb0bb7e114a735b5b62776b98 (patch) | |
| tree | a51fc8f8904eacf4dd79f85d523745f0bcffbf7e /lisp | |
| parent | 7537186d2be36f704cf6614d5d13bfc2df975431 (diff) | |
| download | emacs-5d771766ab10a84bb0bb7e114a735b5b62776b98.tar.gz emacs-5d771766ab10a84bb0bb7e114a735b5b62776b98.zip | |
(append-to-buffer): Don't use current buffer as default.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/simple.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 16e333ed72e..14e2c68aa14 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -1290,7 +1290,7 @@ When calling from a program, give three arguments: | |||
| 1290 | BUFFER (or buffer name), START and END. | 1290 | BUFFER (or buffer name), START and END. |
| 1291 | START and END specify the portion of the current buffer to be copied." | 1291 | START and END specify the portion of the current buffer to be copied." |
| 1292 | (interactive | 1292 | (interactive |
| 1293 | (list (read-buffer "Append to buffer: " (other-buffer nil t)) | 1293 | (list (read-buffer "Append to buffer: " (other-buffer (current-buffer) t)) |
| 1294 | (region-beginning) (region-end))) | 1294 | (region-beginning) (region-end))) |
| 1295 | (let ((oldbuf (current-buffer))) | 1295 | (let ((oldbuf (current-buffer))) |
| 1296 | (save-excursion | 1296 | (save-excursion |