(provide (quote view)) (defvar view-mode-map nil) (if view-mode-map nil (setq view-mode-map (make-keymap)) (fillarray view-mode-map (quote View-undefined)) (define-key view-mode-map "" (quote exit-recursive-edit)) (define-key view-mode-map "" (quote suspend-emacs)) (define-key view-mode-map "q" (quote exit-recursive-edit)) (define-key view-mode-map "-" (quote negative-argument)) (define-key view-mode-map "0" (quote digit-argument)) (define-key view-mode-map "1" (quote digit-argument)) (define-key view-mode-map "2" (quote digit-argument)) (define-key view-mode-map "3" (quote digit-argument)) (define-key view-mode-map "4" (quote digit-argument)) (define-key view-mode-map "5" (quote digit-argument)) (define-key view-mode-map "6" (quote digit-argument)) (define-key view-mode-map "7" (quote digit-argument)) (define-key view-mode-map "8" (quote digit-argument)) (define-key view-mode-map "9" (quote digit-argument)) (define-key view-mode-map "" (quote universal-argument)) (define-key view-mode-map "" nil) (define-key view-mode-map "" (quote Control-X-prefix)) (define-key view-mode-map "-" (quote negative-argument)) (define-key view-mode-map "0" (quote digit-argument)) (define-key view-mode-map "1" (quote digit-argument)) (define-key view-mode-map "2" (quote digit-argument)) (define-key view-mode-map "3" (quote digit-argument)) (define-key view-mode-map "4" (quote digit-argument)) (define-key view-mode-map "5" (quote digit-argument)) (define-key view-mode-map "6" (quote digit-argument)) (define-key view-mode-map "7" (quote digit-argument)) (define-key view-mode-map "8" (quote digit-argument)) (define-key view-mode-map "9" (quote digit-argument)) (define-key view-mode-map "<" (quote beginning-of-buffer)) (define-key view-mode-map ">" (quote end-of-buffer)) (define-key view-mode-map "v" (quote View-scroll-lines-backward)) (define-key view-mode-map "" (quote View-scroll-lines-forward)) (define-key view-mode-map " " (quote View-scroll-lines-forward)) (define-key view-mode-map "" (quote View-scroll-lines-backward)) (define-key view-mode-map " " (quote View-scroll-one-more-line)) (define-key view-mode-map " " (quote View-scroll-one-more-line)) (define-key view-mode-map "" (quote recenter)) (define-key view-mode-map "z" (quote View-scroll-lines-forward-set-scroll-size)) (define-key view-mode-map "g" (quote View-goto-line)) (define-key view-mode-map "=" (quote what-line)) (define-key view-mode-map "." (quote set-mark-command)) (define-key view-mode-map "