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

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

[nongnu] elpa/git-commit 9585356e98 03/10: magit-commit-section: New cla


From: ELPA Syncer
Subject: [nongnu] elpa/git-commit 9585356e98 03/10: magit-commit-section: New class
Date: Tue, 22 Feb 2022 08:58:15 -0500 (EST)

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

    magit-commit-section: New class
---
 lisp/magit-base.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/lisp/magit-base.el b/lisp/magit-base.el
index e4641c616f..623afa531d 100644
--- a/lisp/magit-base.el
+++ b/lisp/magit-base.el
@@ -439,6 +439,9 @@ and delay of your graphical environment or operating 
system."
 
 ;;; Section Classes
 
+(defclass magit-commit-section (magit-section)
+  ())
+
 (defclass magit-file-section (magit-section)
   ((keymap :initform 'magit-file-section-map)
    (source :initform nil)
@@ -456,6 +459,7 @@ and delay of your graphical environment or operating 
system."
    (to-range    :initform nil)
    (about       :initform nil)))
 
+(setf (alist-get 'commit magit--section-type-alist) 'magit-commit-section)
 (setf (alist-get 'file   magit--section-type-alist) 'magit-file-section)
 (setf (alist-get 'module magit--section-type-alist) 'magit-module-section)
 (setf (alist-get 'hunk   magit--section-type-alist) 'magit-hunk-section)



reply via email to

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