diff options
| author | Jonas Bernoulli <jonas@bernoul.li> | 2021-01-10 15:01:00 +0100 |
|---|---|---|
| committer | David Bremner <david@tethera.net> | 2021-01-15 06:38:43 -0400 |
| commit | 65fc5ea758b959ceec173b90e57cbca22f57c4a2 (patch) | |
| tree | db601008d59d0aaf4cea4426631d4cf4435e33c1 /emacs | |
| parent | 16b2db0986ce0ed7c420a69d0a98bb41e9ca4bd8 (diff) | |
emacs: various comment improvements
Diffstat (limited to 'emacs')
| -rw-r--r-- | emacs/notmuch-address.el | 5 | ||||
| -rw-r--r-- | emacs/notmuch-hello.el | 4 | ||||
| -rw-r--r-- | emacs/notmuch-lib.el | 6 |
3 files changed, 6 insertions, 9 deletions
diff --git a/emacs/notmuch-address.el b/emacs/notmuch-address.el index 2f0ec9b3..1f22e377 100644 --- a/emacs/notmuch-address.el +++ b/emacs/notmuch-address.el @@ -381,7 +381,7 @@ to be a saved address hash." (defun notmuch-address--save-address-hash () (when notmuch-address-save-filename (if (or (not (file-exists-p notmuch-address-save-filename)) - ;; The file exists, check it is a file we saved + ;; The file exists, check it is a file we saved. (notmuch-address--get-address-hash)) (with-temp-file notmuch-address-save-filename (let ((save-plist @@ -404,8 +404,7 @@ appear to be an address savefile. Not overwriting." nil nil (lambda (_proc event) ;; If harvest fails, we want to try - ;; again when the trigger is next - ;; called + ;; again when the trigger is next called. (if (string= event "finished\n") (progn (notmuch-address--save-address-hash) diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el index ffd3d799..186ac172 100644 --- a/emacs/notmuch-hello.el +++ b/emacs/notmuch-hello.el @@ -731,9 +731,7 @@ The screen may be customized via `\\[customize]'. Complete list of currently available key bindings: \\{notmuch-hello-mode-map}" - (setq notmuch-buffer-refresh-function #'notmuch-hello-update) - ;;(setq buffer-read-only t) - ) + (setq notmuch-buffer-refresh-function #'notmuch-hello-update)) ;;; Inserters diff --git a/emacs/notmuch-lib.el b/emacs/notmuch-lib.el index 3add992b..72549a98 100644 --- a/emacs/notmuch-lib.el +++ b/emacs/notmuch-lib.el @@ -247,7 +247,7 @@ displays both values separately." (let* ((val (notmuch-command-to-string "config" "get" item)) (len (length val))) ;; Trim off the trailing newline (if the value is empty or not - ;; configured, there will be no newline) + ;; configured, there will be no newline). (if (and (> len 0) (= (aref val (- len 1)) ?\n)) (substring val 0 -1) @@ -483,8 +483,8 @@ be displayed." ;;; String Utilities (defun notmuch-prettify-subject (subject) - ;; This function is used by `notmuch-search-process-filter' which - ;; requires that we not disrupt its' matching state. + ;; This function is used by `notmuch-search-process-filter', + ;; which requires that we not disrupt its matching state. (save-match-data (if (and subject (string-match "^[ \t]*$" subject)) |