emacs: Use one or three lines for 'if' forms

Putting the COND and THEN parts on the same line but ELSE on a
separate line makes it harder to determine if there actually is
an ELSE part.
This commit is contained in:
Jonas Bernoulli 2020-08-08 13:49:44 +02:00 committed by David Bremner
parent e1a700067a
commit 99b6e780c8
3 changed files with 8 additions and 4 deletions

View file

@ -611,7 +611,8 @@ the given type."
,@(and process-crypto '("--decrypt=true"))
,(notmuch-id-to-query (plist-get msg :id))))
(coding-system-for-read
(if binaryp 'no-conversion
(if binaryp
'no-conversion
(let ((coding-system
(mm-charset-to-coding-system
(plist-get part :content-charset))))
@ -680,7 +681,8 @@ current buffer, if possible."
;; `gnus-decoded' charset. Otherwise, we'll fetch the binary
;; part content and let mm-* decode it.
(let* ((have-content (plist-member part :content))
(charset (if have-content 'gnus-decoded
(charset (if have-content
'gnus-decoded
(plist-get part :content-charset)))
(handle (mm-make-handle (current-buffer)
`(,content-type (charset . ,charset)))))

View file

@ -532,7 +532,8 @@ and vice versa."
(and (symbolp name)
(symbol-name name))))
(name-string (if name
(if reverse (concat "Reverse " name)
(if reverse
(concat "Reverse " name)
name)
(mapconcat #'identity tag-change " "))))
(push (list key name-string

View file

@ -1009,7 +1009,8 @@ the same as for the function notmuch-tree."
(setq notmuch-tree-basic-query basic-query)
(setq notmuch-tree-query-context (if (or (string= query-context "")
(string= query-context "*"))
nil query-context))
nil
query-context))
(setq notmuch-tree-target-msg target)
(setq notmuch-tree-open-target open-target)
;; Set the default value for `notmuch-show-process-crypto' in this