(ielm-eval-input): Fix thinko in last change.

2 files changed, 8 insertions, 4 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cd08a5ad9ba..b123e4db7a6 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-11-16  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+        * ielm.el (ielm-eval-input): Fix thinko in last change.
+
 2008-11-16  Chong Yidong  <cyd@stupidchicken.com>
 
         * subr.el (read-passwd): Yank current kill if the user enters C-y.
@@ -8,8 +12,8 @@
         (tramp-file-name-handler-alist): Handle `file-name-as-directory'.
 
         * net/tramp-fish.el (tramp-fish-file-name-handler-alist)
-        * net/tramp-smb.el (tramp-smb-file-name-handler-alist): Handle
-        `file-name-as-directory'.
+        * net/tramp-smb.el (tramp-smb-file-name-handler-alist):
+        Handle `file-name-as-directory'.
 
 2008-11-16  Chong Yidong  <cyd@stupidchicken.com>
 
@@ -2079,7 +2083,7 @@
 
         * add-log.el (change-log-default-name): Autoload safety.
 
-2008-09-05 Wilson Snyder  <wsnyder@wsnyder.org>
+2008-09-05  Wilson Snyder  <wsnyder@wsnyder.org>
 
         * verilog-mode.el (verilog-library-extensions): Enable .sv
         filename extensions to call verilog-mode.
diff --git a/lisp/ielm.el b/lisp/ielm.el
index e22b6eda8b2..035aacbdd0e 100644
--- a/lisp/ielm.el
+++ b/lisp/ielm.el
@@ -389,7 +389,7 @@ simply inserts a newline."
             (setq ielm-result "More than one sexp in input"))))
 
       ;; If the eval changed the current buffer, mention it here
-      (when (eq ielm-wbuf ielm-working-buffer)
+      (unless (eq ielm-wbuf ielm-working-buffer)
         (message "current buffer is now: %s" ielm-wbuf)
         (setq ielm-working-buffer ielm-wbuf))