From 5d771766ab10a84bb0bb7e114a735b5b62776b98 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 22 Nov 1994 19:19:42 +0000 Subject: [PATCH] (append-to-buffer): Don't use current buffer as default. --- lisp/simple.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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: 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)) + (list (read-buffer "Append to buffer: " (other-buffer (current-buffer) t)) (region-beginning) (region-end))) (let ((oldbuf (current-buffer))) (save-excursion -- 2.39.5