* lisp/simple.el (count-words--buffer-message): Fix narrowing check.

2 files changed, 3 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 179d5be11ca..33e641b5fc1 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2012-09-07  Chong Yidong  <cyd@gnu.org>
 
+        * simple.el (count-words--buffer-message): Fix narrowing check.
+
         * help.el (describe-key-briefly): Allow the message to be seen
         when invoked from the minibuffer (Bug#7014).
 
diff --git a/lisp/simple.el b/lisp/simple.el
index b7a24f4f970..ca73ba1b03a 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1008,7 +1008,7 @@ END, without printing any message."
 
 (defun count-words--buffer-message ()
   (count-words--message
-   (if (= (point-max) (1+ (buffer-size)))
+   (if (= (- (point-max) (point-min)) (buffer-size))
        "Buffer"
      "Narrowed part of buffer")
    (point-min) (point-max)))