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

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

[nongnu] elpa/git-commit e35f2b9be7 09/13: magit-blame.el: Move internal


From: ELPA Syncer
Subject: [nongnu] elpa/git-commit e35f2b9be7 09/13: magit-blame.el: Move internal variables to beginning of file
Date: Fri, 6 May 2022 15:58:12 -0400 (EDT)

branch: elpa/git-commit
commit e35f2b9be7d08ca1b94380a7d0093557d7667ac5
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    magit-blame.el: Move internal variables to beginning of file
---
 lisp/magit-blame.el | 34 +++++++++++++++++-----------------
 1 file changed, 17 insertions(+), 17 deletions(-)

diff --git a/lisp/magit-blame.el b/lisp/magit-blame.el
index d26765b551..d27f84ff85 100644
--- a/lisp/magit-blame.el
+++ b/lisp/magit-blame.el
@@ -223,6 +223,20 @@ Also see option `magit-blame-styles'."
   "Face used for dates when blaming."
   :group 'magit-faces)
 
+;;; Variables
+
+(defvar-local magit-blame-buffer-read-only nil)
+(defvar-local magit-blame-cache nil)
+(defvar-local magit-blame-disabled-modes nil)
+(defvar-local magit-blame-process nil)
+(defvar-local magit-blame-recursive-p nil)
+(defvar-local magit-blame-type nil)
+(defvar-local magit-blame-separator nil)
+(defvar-local magit-blame-previous-chunk nil)
+
+(defvar-local magit-blame--make-margin-overlays nil)
+(defvar-local magit-blame--style nil)
+
 ;;; Chunks
 
 (defclass magit-blame-chunk ()
@@ -304,23 +318,6 @@ in `magit-blame-read-only-mode-map' instead.")
   "Keymap for `magit-blame-read-only-mode'.")
 
 ;;; Modes
-;;;; Variables
-
-(defvar-local magit-blame-buffer-read-only nil)
-(defvar-local magit-blame-cache nil)
-(defvar-local magit-blame-disabled-modes nil)
-(defvar-local magit-blame-process nil)
-(defvar-local magit-blame-recursive-p nil)
-(defvar-local magit-blame-type nil)
-(defvar-local magit-blame-separator nil)
-(defvar-local magit-blame-previous-chunk nil)
-
-(defvar-local magit-blame--make-margin-overlays nil)
-(defvar-local magit-blame--style nil)
-
-(defsubst magit-blame--style-get (key)
-  (cdr (assoc key (cdr magit-blame--style))))
-
 ;;;; Base Mode
 
 (define-minor-mode magit-blame-mode
@@ -538,6 +535,9 @@ modes is toggled, then this mode also gets toggled 
automatically.
 
 ;;; Display
 
+(defsubst magit-blame--style-get (key)
+  (cdr (assoc key (cdr magit-blame--style))))
+
 (defun magit-blame--make-overlays (buf chunk revinfo)
   (with-current-buffer buf
     (save-excursion



reply via email to

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