[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] trunk r114989: * lisp/mh-e/mh-print.el (mh-ps-print-prepri
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] trunk r114989: * lisp/mh-e/mh-print.el (mh-ps-print-preprint): Don't use dynamic-var |
Date: |
Tue, 05 Nov 2013 20:51:10 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 114989
revision-id: address@hidden
parent: address@hidden
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Tue 2013-11-05 15:51:06 -0500
message:
* lisp/mh-e/mh-print.el (mh-ps-print-preprint): Don't use dynamic-var
`prefix-arg' as function argument.
modified:
lisp/mh-e/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-2547
lisp/mh-e/mh-print.el mhprint.el-20091113204419-o5vbwnq5f7feedwu-3196
=== modified file 'lisp/mh-e/ChangeLog'
--- a/lisp/mh-e/ChangeLog 2013-06-19 20:10:57 +0000
+++ b/lisp/mh-e/ChangeLog 2013-11-05 20:51:06 +0000
@@ -1,3 +1,8 @@
+2013-11-05 Stefan Monnier <address@hidden>
+
+ * mh-print.el (mh-ps-print-preprint): Don't use dynamic-var
+ `prefix-arg' as function argument.
+
2013-06-18 Juri Linkov <address@hidden>
* mh-alias.el (mh-alias-local-users): Add non-nil arg REPLACE to
=== modified file 'lisp/mh-e/mh-print.el'
--- a/lisp/mh-e/mh-print.el 2013-01-01 09:11:05 +0000
+++ b/lisp/mh-e/mh-print.el 2013-11-05 20:51:06 +0000
@@ -139,11 +139,11 @@
(interactive (list (mh-interactive-range "Print") (mh-ps-print-preprint 1)))
(mh-ps-print-range range file))
-(defun mh-ps-print-preprint (prefix-arg)
+(defun mh-ps-print-preprint (arg)
"Provide a better default file name for `ps-print-preprint'.
-Pass along the PREFIX-ARG to it."
+Pass along the prefix ARG to it."
(let ((buffer-file-name (format "mh-%s" (substring (buffer-name) 1))))
- (ps-print-preprint prefix-arg)))
+ (ps-print-preprint arg)))
;;;###mh-autoload
(defun mh-ps-print-toggle-faces ()
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] trunk r114989: * lisp/mh-e/mh-print.el (mh-ps-print-preprint): Don't use dynamic-var,
Stefan Monnier <=