Fix right and left key remapping issue (bug#12317)

* lisp/emulation/cua-rect.el (cua--init-rectangles):
* lisp/textmodes/picture.el (picture-mode-map):
* lisp/play/blackbox.el (blackbox-mode-map):
Remap right-char and left-char like forward-char and backward-char.

1 files changed, 2 insertions, 0 deletions

diff --git a/lisp/textmodes/picture.el b/lisp/textmodes/picture.el
index 9e8cbb216d1..5662e905714 100644
--- a/lisp/textmodes/picture.el
+++ b/lisp/textmodes/picture.el
@@ -620,7 +620,9 @@ Leaves the region surrounding the rectangle."
       (picture-substitute 'completion-separator-self-insert-autofilling
                           'picture-self-insert)
       (picture-substitute 'forward-char 'picture-forward-column)
+      (picture-substitute 'right-char 'picture-forward-column)
       (picture-substitute 'backward-char 'picture-backward-column)
+      (picture-substitute 'left-char 'picture-backward-column)
       (picture-substitute 'delete-char 'picture-clear-column)
       ;; There are two possibilities for what is normally on DEL.
       (picture-substitute 'backward-delete-char-untabify 'picture-backward-clear-column)