[elpa] externals/agitate b6e5cdbdda 14/67: Add agitate-enable-outline-minor-mode function

[ELPA Syncer]

branch: externals/agitate
commit b6e5cdbdda3df4bb452f47e2a3c7e68a45456bf6
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Add agitate-enable-outline-minor-mode function
---
 agitate.el | 17 ++++++++++++++++-
 1 file changed, 16 insertions(+), 1 deletion(-)

diff --git a/agitate.el b/agitate.el
index 61350f03ab..2b28c8d377 100644
--- a/agitate.el
+++ b/agitate.el
@@ -7,7 +7,7 @@
 ;; URL: https://git.sr.ht/~protesilaos/NOT-YET-AVAILABLE
 ;; Mailing-List: https://lists.sr.ht/~protesilaos/NOT-YET-AVAILABLE
 ;; Version: 0.0.0
-;; Package-Requires: ((emacs "27.1"))
+;; Package-Requires: ((emacs "28.1"))
 ;; Keywords: convenience, version control, git
 
 ;; This file is NOT part of GNU Emacs.
@@ -90,6 +90,21 @@ relative to its latest revision."
           (diff-buffer-with-file (current-buffer))
       (vc-diff)))
 
+(defvar outline-minor-mode-highlight)
+
+;;;###autoload
+(defun agitate-enable-outline-minor-mode ()
+  "Enable `outline-minor-mode' with appropriate tweaks for diffs.
+
+This basically gives you folding of diff hunks by means of the
+`outline-cycle' command.
+
+Add this function to the `diff-mode-hook'."
+  (require 'outline)
+  (let ((outline-minor-mode-highlight nil))
+    (when (derived-mode-p 'diff-mode)
+      (outline-minor-mode 1))))
+
 ;;;; Commands for log-view (listings of commits)
 
 ;;;###autoload