mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-01 11:14:55 +00:00
Code Issues Releases Activity

(view-mode-enable): Add view-mode-map to

Browse Source 
minor-mode-overriding-map-alist.
This commit is contained in:
Andreas Schwab 2004-02-06 21:41:45 +00:00
parent eb3c144cdb
commit daa3ea8d18
2 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2004-02-06 Andreas Schwab <schwab@suse.de>
* view.el (view-mode-enable): Add view-mode-map to
minor-mode-overriding-map-alist.
2004-02-05 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
* x-dnd.el (x-dnd-get-local-file-name): Fix byte compiler warning

3
lisp/view.el
View File

@ -463,6 +463,9 @@ Entry to view-mode runs the normal hook `view-mode-hook'."
(if (buffer-file-name)
(file-name-nondirectory (buffer-file-name))
(buffer-name))))
;; Override major mode's scrolling commands.
(add-to-list 'minor-mode-overriding-map-alist
(cons 'view-mode view-mode-map))
(force-mode-line-update)
(run-hooks 'view-mode-hook))