# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1197244140 0
# Node ID 7d40f609f780993e3bdb30aa60cc8d9b47f5e898
# Parent  c12a7d068bf681c8f4e233c39afe6c989fd9c219
(Frename_buffer): Change interactive spec from "s" to
Lisp code that uses `read-buffer' with current buffer as default.

diff -r c12a7d068bf6 -r 7d40f609f780 src/buffer.c
--- a/src/buffer.c	Sun Dec 09 23:48:33 2007 +0000
+++ b/src/buffer.c	Sun Dec 09 23:49:00 2007 +0000
@@ -1169,7 +1169,8 @@
 }
 
 DEFUN ("rename-buffer", Frename_buffer, Srename_buffer, 1, 2,
-       "sRename buffer (to new name): \nP",
+       "(list (read-buffer \"Rename buffer (to new 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.