(picture-mode-map): Add arrow keys.

This commit is contained in:
Juri Linkov
2004-04-27 06:46:51 +00:00
parent e4ef3e9287
commit ffe2923b64

View File

@@ -636,7 +636,15 @@ Leaves the region surrounding the rectangle."
(define-key picture-mode-map "\C-c`" 'picture-movement-nw)
(define-key picture-mode-map "\C-c'" 'picture-movement-ne)
(define-key picture-mode-map "\C-c/" 'picture-movement-sw)
(define-key picture-mode-map "\C-c\\" 'picture-movement-se)))
(define-key picture-mode-map "\C-c\\" 'picture-movement-se)
(define-key picture-mode-map [(control ?c) left] 'picture-movement-left)
(define-key picture-mode-map [(control ?c) right] 'picture-movement-right)
(define-key picture-mode-map [(control ?c) up] 'picture-movement-up)
(define-key picture-mode-map [(control ?c) down] 'picture-movement-down)
(define-key picture-mode-map [(control ?c) home] 'picture-movement-nw)
(define-key picture-mode-map [(control ?c) prior] 'picture-movement-ne)
(define-key picture-mode-map [(control ?c) end] 'picture-movement-sw)
(define-key picture-mode-map [(control ?c) next] 'picture-movement-se)))
(defcustom picture-mode-hook nil
"If non-nil, its value is called on entry to Picture mode.