emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 65ffd9f 7/9: * diffview.el (diffview-mode-map): Define exp


From: Stefan Monnier
Subject: [elpa] master 65ffd9f 7/9: * diffview.el (diffview-mode-map): Define explicitly
Date: Fri, 5 Aug 2016 01:37:58 +0000 (UTC)

branch: master
commit 65ffd9f7eafdebdb251cd8c4ca4d1a89f75088f9
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>

    * diffview.el (diffview-mode-map): Define explicitly
---
 packages/diffview/diffview.el |   12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/packages/diffview/diffview.el b/packages/diffview/diffview.el
index 2455c67..a684b05 100644
--- a/packages/diffview/diffview.el
+++ b/packages/diffview/diffview.el
@@ -173,11 +173,13 @@ This is useful for reading patches from mailing lists."
       (setq end (1+ (point)))
       (diffview--view-string (buffer-substring beg end)))))
 
+(defvar diffview-mode-map
+  (let ((map (make-sparse-keymap)))
+    (define-key map (kbd "q") 'diffview--quit)
+    map))
 
-
-;;; You probably don't want to invoke `diffview-mode' directly.  Just use
-;;; one of the autoload functions above.
-
+;; You probably don't want to invoke `diffview-mode' directly.  Just use
+;; one of the autoload functions above.
 (define-derived-mode diffview-mode special-mode "Diffview"
   "Mode for viewing diffs side-by-side"
   (setq font-lock-defaults '(diff-font-lock-keywords t nil nil nil 
(font-lock-multiline . nil))))
@@ -193,8 +195,6 @@ This is useful for reading patches from mailing lists."
     (if minusbuf (kill-buffer minusbuf)))
   (set-window-configuration diffview--saved-wincfg))
 
-(define-key diffview-mode-map (kbd "q") 'diffview--quit)
-
 (provide 'diffview)
 ;;; diffview.el ends here
 ;;



reply via email to

[Prev in Thread] Current Thread [Next in Thread]