diff options
| author | Jonas Bernoulli <jonas@bernoul.li> | 2021-01-10 15:00:48 +0100 |
|---|---|---|
| committer | David Bremner <david@tethera.net> | 2021-01-13 07:16:23 -0400 |
| commit | 0067a43ea2ee554eafed1e1300a71259cd6b6a6d (patch) | |
| tree | 3434a63a6df67c7da6073ce2c25e2071b28aab9a /emacs/notmuch-print.el | |
| parent | fc4cda07a9afbbb545dcc6cd835ca697f6ef2a1b (diff) | |
emacs: deal with unused lexical arguments and variables
The previous commit switched to lexical-binding but without dealing
with the new warnings about unused lexical arguments and variables.
This commit deals with most of them, in most cases by either removing
leftover bindings that are actually unnecessary, or by marking certain
arguments as "known to be unused" by prefixing their names with "_".
In the case of the functions named `notmuch-show-insert-...' the
amount of silencing that is required is a bit extreme and we might
want to investigate if there is a better way.
In the case of `notmuch-mua-mail', ignoring CONTINUE means that we do
not fully follow the intended behavior described in `compose-mail's
doc-string.
Diffstat (limited to 'emacs/notmuch-print.el')
| -rw-r--r-- | emacs/notmuch-print.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/emacs/notmuch-print.el b/emacs/notmuch-print.el index 8da9a091..d0061499 100644 --- a/emacs/notmuch-print.el +++ b/emacs/notmuch-print.el @@ -58,7 +58,7 @@ Optional OUTPUT allows passing a list of flags to muttprint." ;;; User-visible functions -(defun notmuch-print-lpr (msg) +(defun notmuch-print-lpr (_msg) "Print a message buffer using lpr." (lpr-buffer)) @@ -78,11 +78,11 @@ Optional OUTPUT allows passing a list of flags to muttprint." (ps-print-buffer ps-file) (notmuch-print-run-evince ps-file))) -(defun notmuch-print-muttprint (msg) +(defun notmuch-print-muttprint (_msg) "Print a message using muttprint." (notmuch-print-run-muttprint)) -(defun notmuch-print-muttprint/evince (msg) +(defun notmuch-print-muttprint/evince (_msg) "Preview a message buffer using muttprint and evince." (let ((ps-file (make-temp-file "notmuch" nil ".ps"))) (notmuch-print-run-muttprint (list "--printer" (concat "TO_FILE:" ps-file))) |
