summaryrefslogtreecommitdiffhomepage
path: root/lib
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2021-09-01 02:02:21 +0100
committerjao <jao@gnu.org>2021-09-01 02:02:21 +0100
commit6d6f596043e5cf190a2d40534cfc70ffeabb9536 (patch)
tree9ae92205ab1207095b4d820d9ac21d6f06c85ff9 /lib
parent6c6ecf30da3a97c859b693ec09eae1a2ae1502ba (diff)
downloadelibs-6d6f596043e5cf190a2d40534cfc70ffeabb9536.tar.gz
elibs-6d6f596043e5cf190a2d40534cfc70ffeabb9536.tar.bz2
whitespace
Diffstat (limited to 'lib')
-rw-r--r--lib/net/jao-notmuch.el22
1 files changed, 9 insertions, 13 deletions
diff --git a/lib/net/jao-notmuch.el b/lib/net/jao-notmuch.el
index 626eee8..a4ce4fd 100644
--- a/lib/net/jao-notmuch.el
+++ b/lib/net/jao-notmuch.el
@@ -32,8 +32,7 @@
(require 'notmuch-tree)
(require 'notmuch-show)
-
-;; Targetting the displayed message from the tree view
+;;;; Targetting the displayed message from the tree view
(defvar-local jao-notmuch--tree-buffer nil)
(declare eww--url-at-point "eww")
@@ -110,8 +109,8 @@
(funcall fn (completing-read "Browse URL: " urls))
(message "No URLs in this message")))))
-
-;; Navigating URLs
+;;;; Navigating URLs
+
(defun jao-notmuch-show-next-button ()
(interactive)
(when (get-text-property (point) 'w3m-href-anchor)
@@ -132,8 +131,7 @@
(thing-at-point-url-at-point)))
(browse-url url)))
-
-;; Toggling mime parts and images
+;;;; Toggling mime parts and images
(defun jao-notmuch--toggle-mime ()
(save-excursion
@@ -183,7 +181,8 @@
(add-hook 'notmuch-show-mode-hook #'jao-notmuch--setup-w3m-images)
-;; fix w3m renderer keymap
+;;;; w3m renderer
+
(defun jao-w3m-gnus-html-renderer (handle)
(let ((w3m-message-silent t)
(mm-w3m-safe-url-regexp nil))
@@ -272,8 +271,7 @@
(interactive)
(message (jao-notmuch--tree-update-buffer-name)))
-
-;; Outline mode for tree view
+;;;; Outline mode for tree view
(defun jao-notmuch-tree--msg-prefix (msg)
(insert (propertize (if (plist-get msg :first) "> " " ") 'display "")))
@@ -330,8 +328,7 @@
(interactive "P")
(jao-notmuch-tree--next t thread t))
-
-;; Updating the tree window after insertion
+;;;; Updating the tree window after insertion
(defun jao-notmuch--tree-sentinel (proc &rest _)
(when (eq (process-status proc) 'exit)
@@ -343,8 +340,7 @@
(jao-notmuch-tree-outline-setup prefix)
(advice-add 'notmuch-tree-process-sentinel :after #'jao-notmuch--tree-sentinel))
-
-;; Tagging
+;;;; Tagging
(defun jao-notmuch-tag-jump-and-next (reverse)
(interactive "P")