emacs: place complete first sentence on first doc-string line

This commit is contained in:
Jonas Bernoulli 2020-11-16 22:28:29 +01:00 committed by David Bremner
parent a7ba52eb94
commit 3cdf105e0f
3 changed files with 7 additions and 11 deletions

View file

@ -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)

View file

@ -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)

View file

@ -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))