mirror of
https://git.notmuchmail.org/git/notmuch
synced 2024-11-25 12:28:09 +01:00
emacs: notmuch-check-exit-status bugfix
This function prints diagnostic information in the event of an error. However, one of the callers has an optional :stdin-string keyword argument. This causes the error printing routine to error itself. Rather than reach notmuch-check-exit-status about the possible keyword arguments (currently only one but could be more in the future) this commit just tells notmuch-check-exit-status how to print non-string arguments.
This commit is contained in:
parent
e0e6a17675
commit
74b54fb0fa
1 changed files with 8 additions and 2 deletions
|
@ -790,9 +790,15 @@ You may need to restart Emacs or upgrade your notmuch package."))
|
|||
(insert-file-contents err-file)
|
||||
(unless (eobp)
|
||||
(buffer-string)))))
|
||||
(command-string
|
||||
(mapconcat (lambda (arg)
|
||||
(shell-quote-argument
|
||||
(cond ((stringp arg) arg)
|
||||
((symbolp arg) (symbol-name arg))
|
||||
(t "*UNKNOWN ARGUMENT*"))))
|
||||
command " "))
|
||||
(extra
|
||||
(concat
|
||||
"command: " (mapconcat #'shell-quote-argument command " ") "\n"
|
||||
(concat "command: " command-string "\n"
|
||||
(if (integerp exit-status)
|
||||
(format "exit status: %s\n" exit-status)
|
||||
(format "exit signal: %s\n" exit-status))
|
||||
|
|
Loading…
Reference in a new issue