* lisp/man.el (Man-bgproc-sentinel): Use `Man-page-from-arguments'

for the message about the man page cleaned up.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c35bc73cdc005acc4dd6ccf8e9ec3091ab01ff15..107f95f352ce879657f8f7f4e5ef652ebcdfab40 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -21,11 +21,14 @@
        `Man-bgproc-filter'.  Move the call of `Man-mode' to
        `Man-getpage-in-background'.  Use `quit-restore-window'
        instead of `kill-buffer'.  Use `message' instead of `error'
-       because errors are catched by process sentinel.
+       because errors are caught by process sentinel.
        (Man-mode): Move calls of `Man-build-page-list',
        `Man-strip-page-headers', `Man-unindent', `Man-goto-page' to
        `Man-bgproc-sentinel'.  Doc fix.  (Bug#2588, bug#5054, bug#9084, bug#17831)
 
+       * man.el (Man-bgproc-sentinel): Use `Man-page-from-arguments'
+       for the message about the man page cleaned up.
+
 2014-07-01  Mario Lang  <mlang@delysid.org>
 
        * net/gnutls.el (gnutls-negotiate): Prevent destructive modification of

diff --git a/lisp/man.el b/lisp/man.el
index c14231212d0d12a29ce3169ffd586bca6e824a27..4b235302f8b4549289f6224b7995781105c77165 100644 (file)
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -1432,7 +1432,8 @@ manpage command."
                (if Man-fontify-manpage-flag
                    (message "%s man page formatted"
                             (Man-page-from-arguments Man-arguments))
-                 (message "%s man page cleaned up" Man-arguments))
+                 (message "%s man page cleaned up"
+                          (Man-page-from-arguments Man-arguments)))
                (unless (and (processp process)
                             (not (eq (process-status process) 'exit)))
                  (setq mode-line-process nil))