summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/mh-e/mh-print.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mh-e/mh-print.el b/lisp/mh-e/mh-print.el
index 6b2e8a3474e..41d6a1a0020 100644
--- a/lisp/mh-e/mh-print.el
+++ b/lisp/mh-e/mh-print.el
@@ -153,7 +153,7 @@ interactive use."
"Print current show buffer to FILE."
(interactive (list (mh-ps-print-preprint current-prefix-arg)))
(message "mh-ps-print-msg-show file %s keys %s mh-show-buffer %s"
- file (this-command-keys mh-show-buffer))
+ file (this-command-keys) mh-show-buffer)
(let ((msg (mh-get-msg-num t))
(folder mh-current-folder)
(show-buffer mh-show-buffer)