diff options
| author | Juri Linkov <juri@jurta.org> | 2007-12-12 00:10:37 +0000 |
|---|---|---|
| committer | Juri Linkov <juri@jurta.org> | 2007-12-12 00:10:37 +0000 |
| commit | c7d97628b0b89069ae740bf0955d1bdb595e1a09 (patch) | |
| tree | b04ea66f519a7f7dee3a0b0fcb56c591389feeeb /src/buffer.c | |
| parent | 5ec7fe1bff1362d0bb58d0bbc854ca815c1bc81d (diff) | |
| download | emacs-c7d97628b0b89069ae740bf0955d1bdb595e1a09.tar.gz emacs-c7d97628b0b89069ae740bf0955d1bdb595e1a09.tar.bz2 emacs-c7d97628b0b89069ae740bf0955d1bdb595e1a09.zip | |
(Frename_buffer): In interactive spec replace
`read-buffer' with `read-string' that uses `buffer-name-history'
as history, and the current buffer's name as default.
Diffstat (limited to 'src/buffer.c')
| -rw-r--r-- | src/buffer.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/buffer.c b/src/buffer.c index 44c449767c3..58e2bd9e4cd 100644 --- a/src/buffer.c +++ b/src/buffer.c @@ -1187,8 +1187,9 @@ buffer as BUFFER. */) } DEFUN ("rename-buffer", Frename_buffer, Srename_buffer, 1, 2, - "(list (read-buffer \"Rename buffer (to new name): \" \ - (current-buffer)) current-prefix-arg)", + "(list (read-string \"Rename buffer (to new name): \" \ + nil 'buffer-name-history (buffer-name (current-buffer))) \ + current-prefix-arg)", doc: /* Change current buffer's name to NEWNAME (a string). If second arg UNIQUE is nil or omitted, it is an error if a buffer named NEWNAME already exists. |