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

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

[elpa] externals/denote bbde012c4c 5/6: Make denote-backlinks-toggle-con


From: ELPA Syncer
Subject: [elpa] externals/denote bbde012c4c 5/6: Make denote-backlinks-toggle-context produce a message about its state
Date: Thu, 25 Jul 2024 12:58:28 -0400 (EDT)

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

    Make denote-backlinks-toggle-context produce a message about its state
---
 denote.el | 17 +++++++++++------
 1 file changed, 11 insertions(+), 6 deletions(-)

diff --git a/denote.el b/denote.el
index c2a05053e2..f7ec5ac0f5 100644
--- a/denote.el
+++ b/denote.el
@@ -4339,12 +4339,17 @@ option.
 
 When called inside of a backlinks buffer, also revert the buffer."
   (interactive)
-  (if denote-backlinks-show-context
-      (setq denote-backlinks-show-context nil)
-    (setq denote-backlinks-show-context t))
-  (when (derived-mode-p 'denote-backlinks-mode)
-    (revert-buffer)
-    (fit-window-to-buffer)))
+  (let ((state))
+    (if denote-backlinks-show-context
+        (setq denote-backlinks-show-context nil
+              state "compact")
+      (setq denote-backlinks-show-context t
+            state "detailed"))
+    (message "Toggled the %s view for the backlinks"
+             (propertize state 'face 'error))
+    (when (derived-mode-p 'denote-backlinks-mode)
+      (revert-buffer)
+      (fit-window-to-buffer))))
 
 (defvar denote-backlinks-mode-map
   (let ((m (make-sparse-keymap)))



reply via email to

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