summaryrefslogtreecommitdiffhomepage
path: root/lib/net
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2021-06-18 20:18:03 +0100
committerjao <jao@gnu.org>2021-06-18 20:18:03 +0100
commite60ec9225970419d9de7cfee6e180f7e742b7e49 (patch)
tree8efb9aaf79662a45b4bfa09db762971b7776a04d /lib/net
parent7a64e219709a9ae74855eeb37a0ccfccc3cc2060 (diff)
downloadelibs-e60ec9225970419d9de7cfee6e180f7e742b7e49.tar.gz
elibs-e60ec9225970419d9de7cfee6e180f7e742b7e49.tar.bz2
nits
Diffstat (limited to 'lib/net')
-rw-r--r--lib/net/jao-notmuch.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/net/jao-notmuch.el b/lib/net/jao-notmuch.el
index 4ca8573..f0659f6 100644
--- a/lib/net/jao-notmuch.el
+++ b/lib/net/jao-notmuch.el
@@ -211,6 +211,11 @@
(interactive)
(jao-notmuch-tree--tag-and-next '("-unread" "-new") nil t))
+(defun jao-notmuch-tree-flag (unmark)
+ (interactive "P")
+ (let ((tags (if unmark '("-flagged") '("-unread" "-new" "-deleted" "+flagged"))))
+ (jao-notmuch-tree--tag-and-next tags nil nil)))
+
(defun jao-notmuch-tree-spam (unmark)
(interactive "P")
(let ((tags (if unmark '("-spam") '("-unread" "-new" "+spam"))))