mirror of
https://git.notmuchmail.org/git/notmuch
synced 2024-11-21 18:38:08 +01:00
emacs: place complete first sentence on first doc-string line
This commit is contained in:
parent
a7ba52eb94
commit
3cdf105e0f
3 changed files with 7 additions and 11 deletions
|
@ -103,8 +103,7 @@ mode."
|
|||
:supertype 'notmuch-button-type)
|
||||
|
||||
(defun notmuch-crypto-insert-sigstatus-button (sigstatus from)
|
||||
"Insert a button describing the signature status SIGSTATUS sent
|
||||
by user FROM."
|
||||
"Insert a button describing the signature status SIGSTATUS sent by user FROM."
|
||||
(let* ((status (plist-get sigstatus :status))
|
||||
(show-button t)
|
||||
(face 'notmuch-crypto-signature-unknown)
|
||||
|
|
|
@ -372,8 +372,7 @@ supported for \"Customized queries section\" items."
|
|||
"List of sections titles whose contents are hidden.")
|
||||
|
||||
(defvar notmuch-hello-first-run t
|
||||
"True if `notmuch-hello' is run for the first time, set to nil
|
||||
afterwards.")
|
||||
"True if `notmuch-hello' is run for the first time, set to nil afterwards.")
|
||||
|
||||
(defun notmuch-hello-nice-number (n)
|
||||
(let (result)
|
||||
|
|
|
@ -73,8 +73,7 @@ If this is `nil' then no `User-Agent:' will be generated."
|
|||
:group 'notmuch-send)
|
||||
|
||||
(defcustom notmuch-mua-hidden-headers nil
|
||||
"Headers that are added to the `message-mode' hidden headers
|
||||
list."
|
||||
"Headers that are added to the `message-mode' hidden headers list."
|
||||
:type '(repeat string)
|
||||
:group 'notmuch-send)
|
||||
|
||||
|
@ -167,8 +166,7 @@ Typically this is added to `notmuch-mua-send-hook'."
|
|||
(t (error "Invalid value for `notmuch-mua-compose-in'"))))
|
||||
|
||||
(defun notmuch-mua-maybe-set-window-dedicated ()
|
||||
"Set the selected window as dedicated according to
|
||||
`notmuch-mua-compose-in'."
|
||||
"Set the selected window as dedicated according to `notmuch-mua-compose-in'."
|
||||
(when (or (eq notmuch-mua-compose-in 'new-frame)
|
||||
(eq notmuch-mua-compose-in 'new-window))
|
||||
(set-window-dedicated-p (selected-window) t)))
|
||||
|
@ -335,9 +333,9 @@ Typically this is added to `notmuch-mua-send-hook'."
|
|||
(put 'notmuch-message-mode 'flyspell-mode-predicate 'mail-mode-flyspell-verify)
|
||||
|
||||
(defun notmuch-mua-pop-to-buffer (name switch-function)
|
||||
"Pop to buffer NAME, and warn if it already exists and is
|
||||
modified. This function is notmuch adaptation of
|
||||
`message-pop-to-buffer'."
|
||||
"Pop to buffer NAME, and warn if it already exists and is modified.
|
||||
Like `message-pop-to-buffer' but enable `notmuch-message-mode'
|
||||
instead of `message-mode' and SWITCH-FUNCTION is mandatory."
|
||||
(let ((buffer (get-buffer name)))
|
||||
(if (and buffer
|
||||
(buffer-name buffer))
|
||||
|
|
Loading…
Reference in a new issue