(message-mimic-kill-buffer): Support for Emacs 20.x.
authoryamaoka <yamaoka>
Wed, 18 Nov 1998 09:24:18 +0000 (09:24 +0000)
committeryamaoka <yamaoka>
Wed, 18 Nov 1998 09:24:18 +0000 (09:24 +0000)
lisp/message.el

index 8e4560c..3562114 100644 (file)
@@ -2004,6 +2004,7 @@ The text will also be indented the normal way."
        (bufname (read-buffer (format "Kill buffer: (default %s) "
                                      (buffer-name)))))
     (if (or (not bufname)
+           (string-equal bufname "")
            (string-equal bufname (buffer-name)))
        (message-kill-buffer)
       (message "%s must be invoked only for the current buffer." command))))