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

index a79778f..b7a5091 100644 (file)
@@ -2180,6 +2180,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))))