summaryrefslogtreecommitdiff
path: root/lisp/mh-e/mh-print.el
diff options
context:
space:
mode:
authorBill Wohler <wohler@newt.com>2005-12-23 07:40:40 +0000
committerBill Wohler <wohler@newt.com>2005-12-23 07:40:40 +0000
commit2dcf34f9ca6c16817a902fb7340af06708702781 (patch)
tree01f09bebb644d9978078e24521e698132ed014c7 /lisp/mh-e/mh-print.el
parentd169946261347a11f80680f4deda7d0a62816f39 (diff)
downloademacs-2dcf34f9ca6c16817a902fb7340af06708702781.tar.gz
Follow Emacs coding conventions. Use default setting of
emacs-lisp-docstring-fill-column which is 65.
Diffstat (limited to 'lisp/mh-e/mh-print.el')
-rw-r--r--lisp/mh-e/mh-print.el89
1 files changed, 47 insertions, 42 deletions
diff --git a/lisp/mh-e/mh-print.el b/lisp/mh-e/mh-print.el
index acca58c494f..a4d53731c72 100644
--- a/lisp/mh-e/mh-print.el
+++ b/lisp/mh-e/mh-print.el
@@ -47,8 +47,8 @@ Valid values are:
black-white - Print colors on black/white printer.
See also `ps-black-white-faces'.
-Any other value is treated as t. This variable is initialized from
-`ps-print-color-p'.")
+Any other value is treated as t. This variable is initialized
+from `ps-print-color-p'.")
(defvar mh-ps-print-func 'ps-spool-buffer-with-faces
"Function to use to spool a buffer.
@@ -108,20 +108,22 @@ Pass along the PREFIX-ARG to it."
(defun mh-ps-print-msg (range)
"Print RANGE\\<mh-folder-mode-map>.
-Check the documentation of `mh-interactive-range' to see how RANGE is read in
-interactive use.
-
-This command will print inline text attachments but will not decrypt messages.
-However, when a message is displayed in an MH-Show buffer, then that buffer is
-used verbatim for printing with the caveat that only text attachments, if
-opened inline, are printed. Therefore, encrypted messages can be printed by
-showing and decrypting them first.
-
-MH-E uses the \"ps-print\" package to do the printing, so you can customize
-the printing further by going to the `ps-print' customization group. This
-command does not use the options `mh-lpr-command-format' or
-`mh-print-background-flag'. See also the commands \\[mh-ps-print-toggle-color]
-and \\[mh-ps-print-toggle-faces]."
+Check the documentation of `mh-interactive-range' to see how RANGE is
+read in interactive use.
+
+This command will print inline text attachments but will not decrypt
+messages. However, when a message is displayed in an MH-Show buffer,
+then that buffer is used verbatim for printing with the caveat that
+only text attachments, if opened inline, are printed. Therefore,
+encrypted messages can be printed by showing and decrypting them
+first.
+
+MH-E uses the \"ps-print\" package to do the printing, so you can
+customize the printing further by going to the `ps-print'
+customization group. This command does not use the options
+`mh-lpr-command-format' or `mh-print-background-flag'. See also the
+commands \\[mh-ps-print-toggle-color] and
+\\[mh-ps-print-toggle-faces]."
(interactive (list (mh-interactive-range "Print")))
(mh-ps-print-range range nil))
@@ -129,20 +131,22 @@ and \\[mh-ps-print-toggle-faces]."
(defun mh-ps-print-msg-file (range file)
"Print RANGE to FILE\\<mh-folder-mode-map>.
-Check the documentation of `mh-interactive-range' to see how RANGE is read in
-interactive use.
-
-This command will print inline text attachments but will not decrypt messages.
-However, when a message is displayed in an MH-Show buffer, then that buffer is
-used verbatim for printing with the caveat that only text attachments, if
-opened inline, are printed. Therefore, encrypted messages can be printed by
-showing and decrypting them first.
-
-MH-E uses the \"ps-print\" package to do the printing, so you can customize
-the printing further by going to the `ps-print' customization group. This
-command does not use the options `mh-lpr-command-format' or
-`mh-print-background-flag'. See also the commands \\[mh-ps-print-toggle-color]
-and \\[mh-ps-print-toggle-faces]."
+Check the documentation of `mh-interactive-range' to see how RANGE is
+read in interactive use.
+
+This command will print inline text attachments but will not decrypt
+messages. However, when a message is displayed in an MH-Show buffer,
+then that buffer is used verbatim for printing with the caveat that
+only text attachments, if opened inline, are printed. Therefore,
+encrypted messages can be printed by showing and decrypting them
+first.
+
+MH-E uses the \"ps-print\" package to do the printing, so you can
+customize the printing further by going to the `ps-print'
+customization group. This command does not use the options
+`mh-lpr-command-format' or `mh-print-background-flag'. See also the
+commands \\[mh-ps-print-toggle-color] and
+\\[mh-ps-print-toggle-faces]."
(interactive (list (mh-interactive-range "Print") (mh-ps-print-preprint 1)))
(mh-ps-print-range range file))
@@ -150,8 +154,8 @@ and \\[mh-ps-print-toggle-faces]."
(defun mh-ps-print-toggle-faces ()
"Toggle whether printing is done with faces or not.
-When faces are enabled, the printed message will look very similar to the
-message in the MH-Show buffer."
+When faces are enabled, the printed message will look very
+similar to the message in the MH-Show buffer."
(interactive)
(if (eq mh-ps-print-func 'ps-spool-buffer-with-faces)
(progn
@@ -164,13 +168,13 @@ message in the MH-Show buffer."
(defun mh-ps-print-toggle-color ()
"Toggle whether color is used in printing messages.
-Colors are emulated on black-and-white printers with shades of gray. This
-might produce illegible output, even if your screen colors only use shades of
-gray. If this is the case, try using this command to toggle between color, no
-color, and a black and white representation of the colors and see which works
-best. You change this setting permanently by customizing the option
+Colors are emulated on black-and-white printers with shades of
+gray. This might produce illegible output, even if your screen
+colors only use shades of gray. If this is the case, try using
+this command to toggle between color, no color, and a black and
+white representation of the colors and see which works best. You
+change this setting permanently by customizing the option
`ps-print-color-p'."
-
(interactive)
(if (eq mh-ps-print-color-option nil)
(progn
@@ -188,11 +192,12 @@ best. You change this setting permanently by customizing the option
(defun mh-print-msg (range)
"Print RANGE the old fashioned way\\<mh-folder-mode-map>.
-The message is formatted with \"mhl\" (see option `mh-mhl-format-file') and
-printed with the \"lpr\" command (see option `mh-lpr-command-format').
+The message is formatted with \"mhl\" (see option
+`mh-mhl-format-file') and printed with the \"lpr\" command (see
+option `mh-lpr-command-format').
-Check the documentation of `mh-interactive-range' to see how RANGE is read in
-interactive use.
+Check the documentation of `mh-interactive-range' to see how
+RANGE is read in interactive use.
Consider using \\[mh-ps-print-msg] instead."
(interactive (list (mh-interactive-range "Print")))