changeset 7455:35657813817c

(Frename_buffer): Reject empty string as new name. (syms_of_buffer): Fix typo in previous change.
author Richard M. Stallman <rms@gnu.org>
date Wed, 11 May 1994 04:16:19 +0000
parents 8d9e41a175fa
children 493a32789e7d
files src/buffer.c
diffstat 1 files changed, 8 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/buffer.c	Wed May 11 04:04:03 1994 +0000
+++ b/src/buffer.c	Wed May 11 04:16:19 1994 +0000
@@ -581,6 +581,10 @@
   register Lisp_Object tem, buf;
 
   CHECK_STRING (name, 0);
+
+  if (XSTRING (name)->size == 0)
+    error ("Empty string is invalid as a buffer name");
+
   tem = Fget_buffer (name);
   /* Don't short-circuit if UNIQUE is t.  That is a useful way to rename
      the buffer automatically so you can create another with the original name.
@@ -2591,7 +2595,7 @@
 That's because these variables are temporarily set to nil.\n\
 As a result, a hook function cannot straightforwardly alter the value of\n\
 these variables.  See the Emacs Lisp manual for a way of\n\
-accomplishing an equivalent result by using other variables.")
+accomplishing an equivalent result by using other variables.");
   Vbefore_change_function = Qnil;
 
   DEFVAR_LISP ("after-change-function", &Vafter_change_function,
@@ -2608,7 +2612,7 @@
 That's because these variables are temporarily set to nil.\n\
 As a result, a hook function cannot straightforwardly alter the value of\n\
 these variables.  See the Emacs Lisp manual for a way of\n\
-accomplishing an equivalent result by using other variables.")
+accomplishing an equivalent result by using other variables.");
   Vafter_change_function = Qnil;
 
   DEFVAR_LISP ("before-change-functions", &Vbefore_change_functions,
@@ -2623,7 +2627,7 @@
 That's because these variables are temporarily set to nil.\n\
 As a result, a hook function cannot straightforwardly alter the value of\n\
 these variables.  See the Emacs Lisp manual for a way of\n\
-accomplishing an equivalent result by using other variables.")
+accomplishing an equivalent result by using other variables.");
   Vbefore_change_functions = Qnil;
 
   DEFVAR_LISP ("after-change-functions", &Vafter_change_functions,
@@ -2640,7 +2644,7 @@
 That's because these variables are temporarily set to nil.\n\
 As a result, a hook function cannot straightforwardly alter the value of\n\
 these variables.  See the Emacs Lisp manual for a way of\n\
-accomplishing an equivalent result by using other variables.")
+accomplishing an equivalent result by using other variables.");
 
   Vafter_change_functions = Qnil;