aboutsummaryrefslogtreecommitdiffstats
path: root/src/buffer.c
diff options
context:
space:
mode:
authorRichard M. Stallman1993-02-14 23:08:25 +0000
committerRichard M. Stallman1993-02-14 23:08:25 +0000
commit3bd779aadb256b7f1c07318a92477f0a9aceafef (patch)
treef013a82d8f360fc7c43fb08d6fd361e70bfb3c78 /src/buffer.c
parent8922af5f60b842d3c0af3e81401e7e8aa5aa17cd (diff)
downloademacs-3bd779aadb256b7f1c07318a92477f0a9aceafef.tar.gz
emacs-3bd779aadb256b7f1c07318a92477f0a9aceafef.zip
(Frename_buffer): Make prefix arg set UNIQUE.
Diffstat (limited to 'src/buffer.c')
-rw-r--r--src/buffer.c15
1 files changed, 8 insertions, 7 deletions
diff --git a/src/buffer.c b/src/buffer.c
index 4057fffbf7d..3499ba29028 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -510,16 +510,17 @@ No argument or nil as argument means use current buffer as BUFFER.")
510} 510}
511 511
512DEFUN ("rename-buffer", Frename_buffer, Srename_buffer, 1, 2, 512DEFUN ("rename-buffer", Frename_buffer, Srename_buffer, 1, 2,
513 "sRename buffer (to new name): ", 513 "sRename buffer (to new name): \nP",
514 "Change current buffer's name to NEWNAME (a string).\n\ 514 "Change current buffer's name to NEWNAME (a string).\n\
515If second arg DISTINGUISH is nil or omitted, it is an error if a\n\ 515If second arg UNIQUE is nil or omitted, it is an error if a\n\
516buffer named NEWNAME already exists.\n\ 516buffer named NEWNAME already exists.\n\
517If DISTINGUISH is non-nil, come up with a new name using\n\ 517If UNIQUE is non-nil, come up with a new name using\n\
518`generate-new-buffer-name'.\n\ 518`generate-new-buffer-name'.\n\
519Return the name we actually gave the buffer.\n\ 519Interactively, you can set UNIQUE with a prefix argument.\n\
520We return the name we actually gave the buffer.\n\
520This does not change the name of the visited file (if any).") 521This does not change the name of the visited file (if any).")
521 (name, distinguish) 522 (name, unique)
522 register Lisp_Object name, distinguish; 523 register Lisp_Object name, unique;
523{ 524{
524 register Lisp_Object tem, buf; 525 register Lisp_Object tem, buf;
525 526
@@ -529,7 +530,7 @@ This does not change the name of the visited file (if any).")
529 return current_buffer->name; 530 return current_buffer->name;
530 if (!NILP (tem)) 531 if (!NILP (tem))
531 { 532 {
532 if (!NILP (distinguish)) 533 if (!NILP (unique))
533 name = Fgenerate_new_buffer_name (name); 534 name = Fgenerate_new_buffer_name (name);
534 else 535 else
535 error ("Buffer name \"%s\" is in use", XSTRING (name)->data); 536 error ("Buffer name \"%s\" is in use", XSTRING (name)->data);