Mercurial > emacs

comparison lisp/view.el @ 343:5d45fc2b81e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Jim Blandy <jimb@redhat.com>
date Sun, 21 Jul 1991 12:39:34 +0000
parents 7e4c7ef44243
children 23984354573b
comparison
equal deleted inserted replaced
342:8bfd98a0dcdd 343:5d45fc2b81e9
23 23
24 (defvar view-mode-map nil) 24 (defvar view-mode-map nil)
25 (if view-mode-map 25 (if view-mode-map
26 nil 26 nil
27 (setq view-mode-map (make-keymap)) 27 (setq view-mode-map (make-keymap))
28 (fillarray view-mode-map 'View-undefined) 28 (fillarray (car (cdr view-mode-map)) 'View-undefined)
29 (define-key view-mode-map "\C-c" 'view-exit) 29 (define-key view-mode-map "\C-c" 'view-exit)
30 (define-key view-mode-map "\C-z" 'suspend-emacs) 30 (define-key view-mode-map "\C-z" 'suspend-emacs)
31 (define-key view-mode-map "q" 'view-exit) 31 (define-key view-mode-map "q" 'view-exit)
32 (define-key view-mode-map "-" 'negative-argument) 32 (define-key view-mode-map "-" 'negative-argument)
33 (define-key view-mode-map "0" 'digit-argument) 33 (define-key view-mode-map "0" 'digit-argument)