From: plugd <plugd@thelambdalab.xyz>
Date: Thu, 29 Jul 2021 08:31:22 +0000 (+0200)
Subject: Clicking the current context now toggles zoom.
X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=lurk.git;a=commitdiff_plain;h=c3002ce69e069369d064b2bb48988e9626c2ffe8

Clicking the current context now toggles zoom.
---

diff --git a/lurk.el b/lurk.el
index 535b990..edfb66f 100644
--- a/lurk.el
+++ b/lurk.el
@@ -472,7 +472,10 @@ portion of the source component of the message, as LURK doesn't use this.")
     (buffer-string)))
 
 (defun lurk--context-button-action (button)
-  (lurk-set-current-context (button-get button 'context)))
+  (let ((context (button-get button 'context)))
+    (if (eq lurk-current-context context)
+        (lurk-toggle-zoom)
+      (lurk-set-current-context context))))
 
 (defun lurk-display-string (context prefix &rest strings)
   (with-current-buffer "*lurk*"