diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 86c8945a272..021d5a07421 100644
--- 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 3e434b36213..17a96e10c1c 100644
--- 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