636 |
(define-key picture-mode-map "\C-c`" 'picture-movement-nw) |
(define-key picture-mode-map "\C-c`" 'picture-movement-nw) |
637 |
(define-key picture-mode-map "\C-c'" 'picture-movement-ne) |
(define-key picture-mode-map "\C-c'" 'picture-movement-ne) |
638 |
(define-key picture-mode-map "\C-c/" 'picture-movement-sw) |
(define-key picture-mode-map "\C-c/" 'picture-movement-sw) |
639 |
(define-key picture-mode-map "\C-c\\" 'picture-movement-se))) |
(define-key picture-mode-map "\C-c\\" 'picture-movement-se) |
640 |
|
(define-key picture-mode-map [(control ?c) left] 'picture-movement-left) |
641 |
|
(define-key picture-mode-map [(control ?c) right] 'picture-movement-right) |
642 |
|
(define-key picture-mode-map [(control ?c) up] 'picture-movement-up) |
643 |
|
(define-key picture-mode-map [(control ?c) down] 'picture-movement-down) |
644 |
|
(define-key picture-mode-map [(control ?c) home] 'picture-movement-nw) |
645 |
|
(define-key picture-mode-map [(control ?c) prior] 'picture-movement-ne) |
646 |
|
(define-key picture-mode-map [(control ?c) end] 'picture-movement-sw) |
647 |
|
(define-key picture-mode-map [(control ?c) next] 'picture-movement-se))) |
648 |
|
|
649 |
(defcustom picture-mode-hook nil |
(defcustom picture-mode-hook nil |
650 |
"If non-nil, its value is called on entry to Picture mode. |
"If non-nil, its value is called on entry to Picture mode. |