emulation/cua-base.el: Recognize `right-char', `left-char' as movement commands.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 86c8945a2720a5a7857513a06e0f8bde6a01a9e4..021d5a0742121961eb89cf6f80fe400d9429c02a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2010-05-30  Juanma Barranquero  <lekktu@gmail.com>
 
+       * emulation/cua-base.el: Recognize `right-char' and `left-char' as
+       movement commands.
+
        * progmodes/ada-xref.el (ada-prj-ada-project-path-sep): Set from
        `path-separator', but maintain compatibility with Emacs 20.2.
 

diff --git a/lisp/emulation/cua-base.el b/lisp/emulation/cua-base.el
index 3e434b36213f8024da4eae5e3ac3fc8d17a1d7dd..17a96e10c1c97a9be08a0e637759d69c6900d5aa 100644 (file)
--- a/lisp/emulation/cua-base.el
+++ b/lisp/emulation/cua-base.el
@@ -1497,6 +1497,7 @@ If ARG is the atom `-', scroll upward by nearly full screen."
 
 (dolist (cmd
  '(forward-char backward-char
+   right-char left-char
    next-line previous-line
    forward-word backward-word
    end-of-line beginning-of-line