* bindings.el ([M-left],[M-right]): Bind to left-word and right-word respectively.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c6bb97b68c1e0c6c336358a5609d7e73ffe76040..6c32655d96c521031cbf541b8054647112419e09 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-10-07  Chong Yidong  <cyd@stupidchicken.com>
+
+       * bindings.el ([M-left],[M-right]): Bind to left-word and
+       right-word respectively.
+
 2011-10-07  Glenn Morris  <rgm@gnu.org>
 
        * cus-start.el (debug-on-quit): Fix custom type.

diff --git a/lisp/bindings.el b/lisp/bindings.el
index 57bfeb60f82723b5173845945794a1f757ba99bc..c056fce1e607bdf218baae8ed7d5f5bd01695f2b 100644 (file)
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -1103,9 +1103,9 @@ if `inhibit-field-text-motion' is non-nil."
   "Keymap for characters following C-c.")
 (define-key global-map "\C-c" 'mode-specific-command-prefix)
 
-(global-set-key [M-right]  'forward-word)
+(global-set-key [M-right]  'right-word)
 (define-key esc-map [right] 'forward-word)
-(global-set-key [M-left]   'backward-word)
+(global-set-key [M-left]   'left-word)
 (define-key esc-map [left] 'backward-word)
 ;; ilya@math.ohio-state.edu says these bindings are standard on PC editors.
 (global-set-key [C-right]  'right-word)