comparison lisp/mail/mh-e.el @ 29120:64ad20494e87

*** empty log message ***
author Stefan Monnier <monnier@iro.umontreal.ca>
date Tue, 23 May 2000 20:10:46 +0000
parents 2e20146198ce
children e5b3af28990a
comparison
equal deleted inserted replaced
29119:c411f27154ee 29120:64ad20494e87
1 ;;; mh-e.el --- GNU Emacs interface to the MH mail system 1 ;;; mh-e.el --- GNU Emacs interface to the MH mail system
2 2
3 ;; Copyright (C) 1985,86,87,88,90,92,93,94,95,97 Free Software Foundation, Inc. 3 ;; Copyright (C) 1985,86,87,88,90,92,93,94,95,97,2000 Free Software Foundation, Inc.
4 4
5 ;; Maintainer: None 5 ;; Maintainer: None
6 ;; Version: 5.0.2 6 ;; Version: 5.0.2
7 ;; Keywords: mail 7 ;; Keywords: mail
8 ;; Bug-reports: include `M-x mh-version' output in any correspondence 8 ;; Bug-reports: include `M-x mh-version' output in any correspondence
58 58
59 ;; Original version for Gosling emacs by Brian Reid, Stanford, 1982. 59 ;; Original version for Gosling emacs by Brian Reid, Stanford, 1982.
60 ;; Modified by James Larus, BBN, July 1984 and UCB, 1984 & 1985. 60 ;; Modified by James Larus, BBN, July 1984 and UCB, 1984 & 1985.
61 ;; Rewritten for GNU Emacs, James Larus 1985. larus@ginger.berkeley.edu 61 ;; Rewritten for GNU Emacs, James Larus 1985. larus@ginger.berkeley.edu
62 ;; Modified by Stephen Gildea 1988. gildea@lcs.mit.edu 62 ;; Modified by Stephen Gildea 1988. gildea@lcs.mit.edu
63 (defconst mh-e-RCS-id "$Id: mh-e.el,v 1.23 2000/03/07 12:36:39 gerd Exp $") 63 (defconst mh-e-RCS-id "$Id: mh-e.el,v 1.24 2000/05/22 17:33:32 fx Exp $")
64 64
65 ;;; Code: 65 ;;; Code:
66 66
67 (provide 'mh-e) 67 (provide 'mh-e)
68 (require 'mh-utils) 68 (require 'mh-utils)
160 :type 'boolean 160 :type 'boolean
161 :group 'mh) 161 :group 'mh)
162 162
163 (defcustom mh-do-not-confirm nil 163 (defcustom mh-do-not-confirm nil
164 "*Non-nil means do not prompt for confirmation before some mh-e commands. 164 "*Non-nil means do not prompt for confirmation before some mh-e commands.
165 Affects non-recoverable commands such as mh-kill-folder and mh-undo-folder." 165 Affects non-recoverable commands such as `mh-kill-folder' and `mh-undo-folder'."
166 :type 'boolean 166 :type 'boolean
167 :group 'mh) 167 :group 'mh)
168 168
169 (defcustom mh-store-default-directory nil 169 (defcustom mh-store-default-directory nil
170 "*Last directory used by \\[mh-store-msg]; default for next store. 170 "*Last directory used by \\[mh-store-msg]; default for next store.
755 Here are all the commands with their current binding, listed in key order: 755 Here are all the commands with their current binding, listed in key order:
756 \\{mh-folder-mode-map} 756 \\{mh-folder-mode-map}
757 757
758 Variables controlling mh-e operation are (defaults in parentheses): 758 Variables controlling mh-e operation are (defaults in parentheses):
759 759
760 mh-recursive-folders (nil) 760 `mh-recursive-folders' (nil)
761 Non-nil means commands which operate on folders do so recursively. 761 Non-nil means commands which operate on folders do so recursively.
762 762
763 mh-bury-show-buffer (t) 763 `mh-bury-show-buffer' (t)
764 Non-nil means that the buffer used to display message is buried. 764 Non-nil means that the buffer used to display message is buried.
765 It will never be offered as the default other buffer. 765 It will never be offered as the default other buffer.
766 766
767 mh-clean-message-header (nil) 767 `mh-clean-message-header' (nil)
768 Non-nil means remove header lines matching the regular expression 768 Non-nil means remove header lines matching the regular expression
769 specified in mh-invisible-headers from messages. 769 specified in mh-invisible-headers from messages.
770 770
771 mh-visible-headers (nil) 771 `mh-visible-headers' (nil)
772 If non-nil, it contains a regexp specifying the headers that are shown in 772 If non-nil, it contains a regexp specifying the headers that are shown in
773 a message if mh-clean-message-header is non-nil. Setting this variable 773 a message if mh-clean-message-header is non-nil. Setting this variable
774 overrides mh-invisible-headers. 774 overrides `mh-invisible-headers'.
775 775
776 mh-do-not-confirm (nil) 776 `mh-do-not-confirm' (nil)
777 Non-nil means do not prompt for confirmation before executing some 777 Non-nil means do not prompt for confirmation before executing some
778 non-recoverable commands such as mh-kill-folder and mh-undo-folder. 778 non-recoverable commands such as `mh-kill-folder' and `mh-undo-folder'.
779 779
780 mhl-formfile (nil) 780 `mhl-formfile' (nil)
781 Name of format file to be used by mhl to show messages. 781 Name of format file to be used by mhl to show messages.
782 A value of T means use the default format file. 782 A value of T means use the default format file.
783 Nil means don't use mhl to format messages. 783 Nil means don't use mhl to format messages.
784 784
785 mh-lpr-command-format (\"lpr -p -J '%s'\") 785 `mh-lpr-command-format' (\"lpr -p -J '%s'\")
786 Format for command used to print a message on a system printer. 786 Format for command used to print a message on a system printer.
787 787
788 mh-scan-prog (\"scan\") 788 `mh-scan-prog' (\"scan\")
789 Program to run to generate one-line-per-message listing of a folder. 789 Program to run to generate one-line-per-message listing of a folder.
790 Normally \"scan\" or a file name linked to scan. This file is searched 790 Normally \"scan\" or a file name linked to scan. This file is searched
791 for relative to the mh-progs directory unless it is an absolute pathname. 791 for relative to the mh-progs directory unless it is an absolute pathname.
792 Automatically becomes buffer-local when set in any fashion. 792 Automatically becomes buffer-local when set in any fashion.
793 793
794 mh-print-background (nil) 794 `mh-print-background' (nil)
795 Print messages in the background if non-nil. 795 Print messages in the background if non-nil.
796 WARNING: do not delete the messages until printing is finished; 796 WARNING: do not delete the messages until printing is finished;
797 otherwise, your output may be truncated. 797 otherwise, your output may be truncated.
798 798
799 mh-recenter-summary-p (nil) 799 `mh-recenter-summary-p' (nil)
800 If non-nil, then the scan listing is recentered when the window displaying 800 If non-nil, then the scan listing is recentered when the window displaying
801 a messages is toggled off. 801 a messages is toggled off.
802 802
803 mh-summary-height (4) 803 `mh-summary-height' (4)
804 Number of lines in the summary window including the mode line. 804 Number of lines in the summary window including the mode line.
805 805
806 The value of mh-folder-mode-hook is called when a new folder is set up." 806 The value of mh-folder-mode-hook is called when a new folder is set up."
807 807
808 (kill-all-local-variables) 808 (kill-all-local-variables)