* lisp/bindings.el: Bind M-= to count-words.

3 files changed, 5 insertions, 1 deletions

diff --git a/etc/NEWS b/etc/NEWS
index 3435a839a74..484cfaf2717 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -159,6 +159,8 @@ prompts for a column number.
 ** `mouse-avoidance-banish-position' can now be used to customize
 `mouse-avoidance-mode' further.
 
+** `M-=' is now bound to `count-words', not `count-words-region'.
+
 ** `C-M-f' and `C-M-b' will now move to the path name separator
 character when doing minibuffer filename prompts.
 
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 92148234226..42e8e9a84fc 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2012-07-18  Chong Yidong  <cyd@gnu.org>
 
+        * bindings.el: Bind M-= to count-words.
+
         * faces.el (face-spec-reset-face): Handle reverse video (Bug#4238).
 
 2012-07-18  Masatake YAMATO  <yamato@redhat.com>
diff --git a/lisp/bindings.el b/lisp/bindings.el
index e0555a17b15..655cda235b4 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -793,7 +793,7 @@ if `inhibit-field-text-motion' is non-nil."
 (define-key ctl-x-map "\C-o" 'delete-blank-lines)
 (define-key esc-map " " 'just-one-space)
 (define-key esc-map "z" 'zap-to-char)
-(define-key esc-map "=" 'count-words-region)
+(define-key esc-map "=" 'count-words)
 (define-key ctl-x-map "=" 'what-cursor-position)
 (define-key esc-map ":" 'eval-expression)
 ;; Define ESC ESC : like ESC : for people who type ESC ESC out of habit.