Mercurial > emacs
changeset 85843:05357c175a50
(doc-view-mode-map): Bind doc-view-goto-page to the keys
used normally for goto-line. Change `g' to revert the buffer.
Add redundant `r' binding for buffer-revert.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 31 Oct 2007 20:40:30 +0000 |
| parents | 96510b236eb5 |
| children | cf0d3de08293 |
| files | lisp/ChangeLog lisp/doc-view.el |
| diffstat | 2 files changed, 7 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Oct 31 20:30:28 2007 +0000 +++ b/lisp/ChangeLog Wed Oct 31 20:40:30 2007 +0000 @@ -1,5 +1,9 @@ 2007-10-31 Stefan Monnier <monnier@iro.umontreal.ca> + * doc-view.el (doc-view-mode-map): Bind doc-view-goto-page to the keys + used normally for goto-line. Change `g' to revert the buffer. + Add redundant `r' binding for buffer-revert. + * mail/mailabbrev.el (mail-abbrevs-mode): Use define-minor-mode. (mail-abbrevs-setup): Use abbrev-expand-functions. (build-mail-abbrevs): Use with-temp-buffer.
--- a/lisp/doc-view.el Wed Oct 31 20:30:28 2007 +0000 +++ b/lisp/doc-view.el Wed Oct 31 20:40:30 2007 +0000 @@ -226,7 +226,7 @@ (define-key map (kbd "DEL") 'doc-view-scroll-down-or-previous-page) (define-key map (kbd "M-<") 'doc-view-first-page) (define-key map (kbd "M->") 'doc-view-last-page) - (define-key map (kbd "g") 'doc-view-goto-page) + (define-key map [remap goto-line] 'doc-view-goto-page) ;; Killing/burying the buffer (and the process) (define-key map (kbd "q") 'bury-buffer) (define-key map (kbd "k") 'doc-view-kill-proc-and-buffer) @@ -250,7 +250,8 @@ ;; Toggle between text and image display or editing (define-key map (kbd "C-c C-c") 'doc-view-toggle-display) ;; Reconvert the current document - (define-key map (kbd "g") 'doc-view-reconvert-doc) + (define-key map (kbd "g") 'revert-buffer) + (define-key map (kbd "r") 'revert-buffer) map) "Keymap used by `doc-view-mode' when displaying a doc as a set of images.")