;ELC ;;; compiled by jwz@thalidomide on Sat May 21 06:34:38 1994 ;;; from file /th/jwz/emacs19/lisp/vm/vm-startup.el ;;; emacs version 19.10 Lucid (beta25). ;;; bytecomp version 2.24; 26-Apr-94. ;;; optimization is on. ;;; this file uses opcodes which do not exist in Emacs 18. (if (and (boundp 'emacs-version) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19"))) (error "This file was compiled for Emacs 19.")) (fset 'vm #[(&optional folder read-only) " " [vm-session-initialization done (byte-code " !?‰ !  !\n\n!\n\"\n!!\n\"\n!\n\"+)q =? ? \"! \"# !p!'p!)!! \"   3 p‰$ !9‰$‰;D$) ! !! @A\"BC#ԁDE \"F !  !GH!I?J?;K>L?M N ? !-" [bufferp folder nil preserve-auto-save-file totals-blurb first-time folder-buffer full-startup expand-file-name vm-primary-inbox file file-directory-p error "%s is a directory" vm-get-file-buffer vm-folder-directory default-directory t enable-local-variables inhibit-local-variables message "Reading %s..." find-file-noselect "Reading %s... done" vm-check-for-killed-summary buffer-modified-p 0 vm-messages-not-on-disk major-mode vm-mode buffer-file-name file-newer-than-file-p make-auto-save-file-name read-only buffer-read-only vm-folder-read-only fboundp buffer-disable-undo buffer-flush-undo x abbrev-mode auto-fill-mode vm-mode-internal vm-assimilate-new-messages vm-gobble-visible-header-variables vm-gobble-bookmark vm-gobble-summary vm-gobble-labels vm-start-itimers-if-needed vm-emit-totals-blurb vm-thoughtfully-select-message vm-message-list vm-preview-current-message vm-update-summary-and-mode-line vm-display vm-should-generate-summary vm-summarize vm-summary-buffer (vm vm-other-frame vm-other-window vm-visit-folder vm-visit-folder-other-frame vm-visit-folder-other-window recover-file revert-buffer nil) this-command vm startup substitute-command-keys "Auto save file is newer; consider \\[recover-file]. FOLDER IS READ ONLY." throw done vm-auto-get-new-mail vm-block-new-mail "Checking for new mail for %s..." buffer-name vm-get-spooled-mail run-hooks vm-visit-folder-hook vm-inhibit-startup-message vm-startup-message-displayed (vm vm-visit-folder) last-command vm-display-startup-message input-pending-p] 7)] 2 "\ Read mail under Emacs. Optional first arg FOLDER specifies the folder to visit. It defaults to the value of vm-primary-inbox. The folder buffer is put into VM mode, a major mode for reading mail. Prefix arg or optional second arg READ-ONLY non-nil indicates that the folder should be considered read only. No attribute changes, messages additions or deletions will be allowed in the visited folder. Visiting the primary inbox causes any contents of the system mailbox to be moved and appended to the resulting buffer. All the messages can be read by repeatedly pressing SPC. Use `n'ext and `p'revious to move about in the folder. Messages are marked for deletion with `d', and saved to another folder with `s'. Quitting VM with `q' expunges deleted messages and saves the buffered folder to disk. See the documentation for vm-mode for more information." (list nil current-prefix-arg)]) (fset 'vm-other-frame #[(&optional folder read-only) " \n \"" [vm-goto-new-frame vm folder read-only] 3 "\ Like vm, but run in a newly created frame." (list nil current-prefix-arg)]) (fset 'vm-other-window #[(&optional folder read-only) "! !\"" [one-window-p t split-window other-window 1 vm folder read-only] 3 "\ Like vm, but run in a different window." (list nil current-prefix-arg)]) (put 'vm-mode 'mode-class 'special) (fset 'vm-mode #[(&optional read-only) "p \"É$" [vm read-only vm-display nil (vm-mode) (vm-mode)] 5 "\ Major mode for reading mail. Commands: h - summarize folder contents C-t - toggle threads display n - go to next message p - go to previous message N - like `n' but ignores skip-variable settings P - like `p' but ignores skip-variable settings M-n - go to next unread message M-p - go to previous unread message RET - go to numbered message (uses prefix arg or prompts in minibuffer) TAB - go to last message seen ^ - go to parent of this message M-s - incremental search through the folder t - display hidden headers SPC - expose message body or scroll forward a page b - scroll backward a page < - go to beginning of current message > - go to end of current message d - delete message, prefix arg deletes messages forward C-d - delete message, prefix arg deletes messages backward u - undelete k - flag for deletion all messages with same subject as the current message r - reply (only to the sender of the message) R - reply with included text from the current message M-r - extract and resend bounced message f - followup (reply to all recipients of message) F - followup with included text from the current message z - forward the current message m - send a message B - resend the current message to another user. c - continue composing the most recent message you were composing @ - digestify and mail entire folder contents (the folder is not modified) * - burst a digest into individual messages, and append and assimilate these message into the current folder. G - sort messages by various keys g - get any new mail that has arrived in the system mailbox (new mail is appended to the disk and buffer copies of the primary inbox.) v - visit another mail folder e - edit the current message j - discard cached information about the current message s - save current message in a folder (appends if folder already exists) w - write current message to a file without its headers (appends if exists) S - save entire folder to disk, does not expunge A - save unfiled messages to their vm-auto-folder-alist specified folders # - expunge deleted messages (without saving folder) q - quit VM, deleted messages are not expunged, folder is saved to disk if it is modified. new messages are changed to be flagged as just unread. x - exit VM with no change to the folder M N - use marks; the next vm command will affect only marked messages if it makes sense for the command to do so M M - mark the current message M U - unmark the current message M m - mark all messages M u - unmark all messages M ? - help for the mark commands M C - mark messages matches by a virtual folder selector M c - unmark messages matches by a virtual folder selector M T - mark thread tree rooted at the current message M t - unmark thread tree rooted at the current message M S - mark messages with the same subject as the current message M s - unmark messages with the same subject as the current message M ? - partial help for mark commands W S - save the current window configuration to a name W D - delete a window configuration W W - apply a configuration W ? - help for the window configuration commands V V - visit a virtual folder (must be defined in vm-virtual-folder-alist) V C - create a virtual folder composed of a subset of the current folder's messages. V A - apply the selectors of a named virtual folder to the messages in the current folder and create a virtual folder containing the selected messages. V M - toggle whether this virtual folder's messages mirror the underlying real messages' attributes. V ? - help for virtual folder commands C-_ - undo, special undo that retracts the most recent changes in message attributes and labels. Expunges message edits, and saves cannot be undone. C-x u is also bound to this command. a - set message attributes l a - add labels to message l d - delete labels from message L - reload your VM init file, ~/.vm % - change a folder to another type ? - help ! - run a shell command | - run a shell command with the current message as input M-C - view conditions under which you may redistribute VM M-W - view the details of VM's lack of a warranty Use M-x vm-submit-bug-report to submit a bug report. Variables: vm-arrived-message-hook vm-auto-center-summary vm-auto-folder-alist vm-auto-folder-case-fold-search vm-auto-get-new-mail vm-auto-next-message vm-berkeley-mail-compatibility vm-check-folder-types vm-convert-folder-types vm-circular-folders vm-confirm-new-folders vm-confirm-quit vm-crash-box vm-default-folder-type vm-delete-after-archiving vm-delete-after-bursting vm-delete-after-saving vm-delete-empty-folders vm-digest-burst-type vm-digest-center-preamble vm-digest-preamble-format vm-digest-send-type vm-display-buffer-hook vm-edit-message-hook vm-folder-directory vm-folder-read-only vm-follow-summary-cursor vm-forward-message-hook vm-forwarded-headers vm-forwarding-digest-type vm-forwarding-subject-format vm-highlighted-header-face vm-highlighted-header-regexp vm-honor-page-delimiters vm-in-reply-to-format vm-included-text-attribution-format vm-included-text-discard-header-regexp vm-included-text-headers vm-included-text-prefix vm-inhibit-startup-message vm-invisible-header-regexp vm-jump-to-new-messages vm-jump-to-unread-messages vm-keep-sent-messages vm-keep-crash-boxes vm-mail-header-from vm-mail-mode-hook vm-mode-hook vm-move-after-deleting vm-move-after-undeleting vm-move-messages-physically vm-mutable-windows vm-mutable-frames vm-preview-lines vm-preview-read-messages vm-primary-inbox vm-quit-hook vm-recognize-pop-maildrops vm-reply-hook vm-reply-ignored-reply-tos vm-reply-ignored-addresses vm-reply-subject-prefix vm-resend-bounced-discard-header-regexp vm-resend-bounced-headers vm-resend-bounced-message-hook vm-resend-discard-header-regexp vm-resend-headers vm-resend-message-hook vm-retrieved-spooled-mail-hook vm-rfc1153-digest-discard-header-regexp vm-rfc1153-digest-headers vm-rfc934-digest-discard-header-regexp vm-rfc934-digest-headers vm-search-using-regexps vm-select-message-hook vm-select-new-message-hook vm-select-unread-message-hook vm-send-digest-hook vm-skip-deleted-messages vm-skip-read-messages vm-spool-files vm-startup-with-summary vm-strip-reply-headers vm-summary-arrow vm-summary-format vm-summary-highlight-face vm-summary-mode-hook vm-summary-redo-hook vm-summary-show-threads vm-summary-subject-no-newlines vm-summary-thread-indent-level vm-trust-From_-with-Content-Length vm-undisplay-buffer-hook vm-unforwarded-header-regexp vm-virtual-folder-alist vm-virtual-mirror vm-visible-headers vm-visit-folder-hook vm-visit-when-saving vm-window-configuration-file " "P"]) (fset 'vm-visit-folder #[(folder &optional read-only) " !! q   !) \"" [vm-session-initialization vm-mail-buffer buffer-name error "Folder buffer has been killed." vm-check-for-killed-summary folder vm-last-visit-folder vm-folder-directory default-directory expand-file-name vm read-only] 3 "\ Visit a mail file. VM will parse and present its messages to you in the usual way. First arg FOLDER specifies the mail file to visit. When this command is called interactively the file name is read from the minibuffer. Prefix arg or optional second arg READ-ONLY non-nil indicates that the folder should be considered read only. No attribute changes, messages additions or deletions will be allowed in the visited folder." (byte-code " !! q ! \n  \n Ѫ  \"# $-D" [vm-session-initialization vm-mail-buffer buffer-name error "Folder buffer has been killed." vm-folder-directory expand-file-name default-directory vm-last-visit-folder vm-last-save-folder this-command last-command default read-file-name format "Visit%s folder:%s " current-prefix-arg " read only" "" " (default %s)" nil] 7)]) (fset 'vm-visit-folder-other-frame #[(folder &optional read-only) " \n \"" [vm-goto-new-frame vm-visit-folder folder read-only] 3 "\ Like vm-visit-folder, but run in a newly created frame." (byte-code " !! q ! \n  \n Ѫ  \"# $-D" [vm-session-initialization vm-mail-buffer buffer-name error "Folder buffer has been killed." vm-folder-directory expand-file-name default-directory vm-last-visit-folder vm-last-save-folder this-command last-command default read-file-name format "Visit%s folder in other frame:%s " current-prefix-arg " read only" "" " (default %s)" nil] 7)]) (fset 'vm-visit-folder-other-window #[(folder &optional read-only) "! !\"" [one-window-p t split-window other-window 1 vm-visit-folder folder read-only] 3 "\ Like vm-visit-folder, but run in a different window." (byte-code " !! q ! \n  \n Ѫ  \"# $-D" [vm-session-initialization vm-mail-buffer buffer-name error "Folder buffer has been killed." vm-folder-directory expand-file-name default-directory vm-last-visit-folder vm-last-save-folder this-command last-command default read-file-name format "Visit%s folder in other window:%s " current-prefix-arg " read only" "" " (default %s)" nil] 7)]) (put 'vm-virtual-mode 'mode-class 'special) (defun vm-virtual-mode (&rest ignored) "\ Mode for reading multiple mail folders as one folder. The commands available are the same commands that are found in vm-mode, except that a few of them are not applicable to virtual folders. vm-virtual-mode is not a normal major mode. If you run it, it will not do anything. The entry point to vm-virtual-mode is vm-visit-virtual-folder.") (fset 'vm-visit-virtual-folder #[(folder-name &optional read-only) " \n \"\n\"\nQȉ \n  !q =?\n!p!p!)!!\" \n \"!!$!  &! !/ȉ$ !pȉ$ȉ2D$t4?5?  !+" [vm-session-initialization assoc folder-name vm-virtual-folder-alist error "No such virtual folder, %s" "(" ")" nil blurb first-time buffer-name get-buffer-create major-mode vm-virtual-mode fboundp buffer-disable-undo buffer-flush-undo x abbrev-mode 0 auto-fill-mode "VM Virtual" mode-name vm-mode-line-format mode-line-format t buffer-read-only read-only vm-folder-read-only make-vector 29 vm-label-obarray vm-virtual-folder-definition vm-build-virtual-message-list use-local-map vm-mode-map vm-emit-totals-blurb vm-summary-show-threads vm-sort-messages "thread" vm-thoughtfully-select-message vm-preview-current-message vm-update-summary-and-mode-line vm-should-generate-summary vm-summarize vm-display vm-summary-buffer message (vm-visit-virtual-folder vm-visit-virtual-folder-other-frame vm-visit-virtual-folder-other-window vm-create-virtual-folder vm-apply-virtual-folder) this-command startup vm-inhibit-startup-message vm-startup-message-displayed vm-display-startup-message] 7 nil (byte-code "  $*D" [last-command this-command vm-session-initialization completing-read "Visit virtual folder: " vm-virtual-folder-alist nil t current-prefix-arg] 5)]) (fset 'vm-visit-virtual-folder-other-frame #[(folder-name &optional read-only) " \n \"" [vm-goto-new-frame vm-visit-virtual-folder folder-name read-only] 3 "\ Like vm-visit-virtual-folder, but run in a newly created frame." (byte-code "  $*D" [last-command this-command vm-session-initialization completing-read "Visit virtual folder in other frame: " vm-virtual-folder-alist nil t current-prefix-arg] 5)]) (fset 'vm-visit-virtual-folder-other-window #[(folder-name &optional read-only) "! !\"" [one-window-p t split-window other-window 1 vm-visit-virtual-folder folder-name read-only] 3 "\ Like vm-visit-virtual-folder, but run in a different window." (byte-code "  $*D" [last-command this-command vm-session-initialization completing-read "Visit virtual folder in other window: " vm-virtual-folder-alist nil t current-prefix-arg] 5)]) (fset 'vm-mail #[nil " !! q !!" [vm-session-initialization vm-mail-buffer buffer-name error "Folder buffer has been killed." vm-check-for-killed-summary vm-mail-internal run-hooks vm-mail-hook vm-mail-mode-hook] 2 "\ Send a mail message from within VM, or from without." nil]) (fset 'vm-mail-other-frame #[nil " " [vm-goto-new-frame vm-mail] 1 "\ Like vm-mail, but run in a newly created frame." nil]) (fset 'vm-mail-other-window #[nil "! ! " [one-window-p t split-window other-window 1 vm-mail] 2 "\ Like vm-mail, but run in a different window." nil]) (fset 'vm-submit-bug-report #[nil "! = \n P@ABCÁDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_`abcdefghijklmnopqrstǁu Ɓvwnxy&ebz{!|y`xy`|} ~," [require reporter (mail) vm-mutable-windows t vm-mutable-frames pop-up-frames pop-up-windows reporter-mailer reporter-submit-bug-report vm-maintainer-address "VM " vm-version vm-arrived-message-hook vm-auto-center-summary vm-auto-folder-case-fold-search vm-auto-get-new-mail vm-auto-next-message vm-berkeley-mail-compatibility vm-check-folder-types vm-circular-folders vm-confirm-new-folders vm-confirm-quit vm-convert-folder-types vm-crash-box vm-default-folder-type vm-delete-after-archiving vm-delete-after-bursting vm-delete-after-saving vm-delete-empty-folders vm-digest-burst-type vm-digest-identifier-header-format vm-digest-center-preamble vm-digest-preamble-format vm-digest-send-type vm-edit-message-hook vm-edit-message-mode vm-flush-interval vm-folder-directory vm-folder-read-only vm-follow-summary-cursor vm-forward-message-hook vm-forwarded-headers vm-forwarding-digest-type vm-forwarding-subject-format vm-highlighted-header-regexp vm-honor-page-delimiters vm-in-reply-to-format vm-included-text-attribution-format vm-included-text-discard-header-regexp vm-included-text-headers vm-included-text-prefix vm-inhibit-startup-message vm-init-file vm-invisible-header-regexp vm-jump-to-new-messages vm-jump-to-unread-messages vm-keep-crash-boxes vm-keep-sent-messages vm-mail-header-from vm-mail-hook vm-mail-mode-hook vm-mode-hook vm-mode-hooks vm-move-after-deleting vm-move-after-undeleting vm-move-messages-physically vm-movemail-program vm-pop-md5-program vm-preview-lines vm-preview-read-messages vm-primary-inbox vm-quit-hook vm-recognize-pop-maildrops vm-reply-hook vm-reply-ignored-addresses vm-reply-ignored-reply-tos vm-reply-subject-prefix vm-resend-bounced-discard-header-regexp vm-resend-bounced-headers vm-resend-bounced-message-hook vm-resend-discard-header-regexp vm-resend-headers vm-resend-message-hook vm-retrieved-spooled-mail-hook vm-rfc1153-digest-discard-header-regexp vm-rfc1153-digest-headers vm-rfc934-digest-discard-header-regexp vm-rfc934-digest-headers vm-search-using-regexps vm-select-message-hook vm-select-new-message-hook vm-select-unread-message-hook vm-send-digest-hook vm-skip-deleted-messages vm-skip-read-messages vm-startup-with-summary vm-strip-reply-headers vm-summary-format vm-summary-highlight-face vm-summary-mode-hook vm-summary-mode-hooks vm-summary-redo-hook vm-summary-show-threads vm-summary-subject-no-newlines vm-summary-thread-indent-level vm-summary-uninteresting-senders vm-summary-uninteresting-senders-arrow vm-tale-is-an-idiot vm-unforwarded-header-regexp vm-virtual-folder-alist vm-virtual-mirror vm-visible-headers vm-visit-folder-hook vm-visit-when-saving vm-window-configuration-file vm-window-configurations vm-fsf-emacs-19-p next-screen-context-lines features nil "Please change the Subject header to a concise bug description.\nRemember to cover the basics, that is, what you expected to\nhappen and what in fact did happen." mail-position-on-field "Subject" 0 "Subject: VM " " induces a brain tumor in the viewer.\n It is the tumor that creates the hallucinations.\n"] 113 "\ Submit a bug report, with pertinent information to the VM bug list." nil]) (byte-code "MM\"\"\"\"\"\"\"\"\"\"\"\"\"\"" [vm-load-init-file #[(&optional interactive) " ? ?$Ɖ$" [vm-init-file-loaded interactive load vm-init-file t vm-display nil (vm-load-init-file) (vm-load-init-file)] 5 nil "p"] vm-session-initialization #[nil "! !  !\" ͉" [boundp vm-session-beginning random t vm-load-init-file vm-window-configuration-file vm-default-window-configuration vm-window-configurations vm-load-window-configurations make-vector 29 0 vm-buffers-needing-display-update nil] 3] autoload reporter-submit-bug-report "reporter" timezone-make-date-sortable "timezone" rfc822-addresses "rfc822" mail-strip-quoted-names "mail-utils" mail-fetch-field mail-position-on-field mail-send "sendmail" mail-mode mail-extract-address-components "mail-extr" set-tapestry "tapestry" tapestry tapestry-replace-tapestry-element tapestry-nullify-tapestry-elements tapestry-remove-frame-parameters] 3) ;ELC ;;; compiled by jwz@thalidomide on Sat May 21 06:35:11 1994 ;;; from file /th/jwz/emacs19/lisp/vm/vm-vars.el ;;; emacs version 19.10 Lucid (beta25). ;;; bytecomp version 2.24; 26-Apr-94. ;;; optimization is on. ;;; this file uses opcodes which do not exist in Emacs 18. (if (and (boundp 'emacs-version) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19"))) (error "This file was compiled for Emacs 19.")) (defvar vm-init-file "~/.vm" "\ *Startup file for VM that is loaded the first time you run VM in an Emacs session.") (defvar vm-primary-inbox "~/INBOX" "\ *Mail is moved from the system mailbox to this file for reading.") (defvar vm-crash-box "~/INBOX.CRASH" "\ *File in which to store mail temporarily while it is transferred from the system mailbox to the primary inbox. If a crash occurs during this mail transfer, any missing mail will be found in this file. VM will do crash recovery from this file automatically at startup, as necessary.") (defvar vm-keep-crash-boxes nil "\ *Non-nil value should be string specifying a directory where your crash boxes should be moved after VM has copied new mail out of them. This is a safety measure. In at least one case a pointer corruption bug inside Emacs has caused VM to believe that it had copied information out of the crash box when it in fact had not. VM then deleted the crash box, losing the batch of incoming mail. This is an exceedingly rare problem, but if you want to avoid losing mail if it happens, set vm-keep-crash-boxes to point to a directory in the same filesystem as all your crash boxes. Each saved crash box will have a unique name based on the current date and time the box was saved. You will need to clean out this directory from time to time; VM does not do so. A nil value means VM should just delete crash boxes after it has copied out the mail.") (fset 'vm-spool-files #[nil "!\"!C" [vm-spool-files getenv "MAILPATH" vm-parse "\\([^:%?]+\\)\\([%?][^:]*\\)?\\(:\\|$\\)" "MAIL"] 3]) (defvar vm-spool-files nil "\ *If non-nil this variable's value should be a list of strings or a list of lists. If the value is a list of strings, the strings should name files that VM will check for incoming mail instead of the default place VM thinks your system mailbox is. Mail will be moved from these mailboxes to your primary inbox as specified by vm-primary-inbox, using vm-crash-box as a waystation. If the value is a list of lists, each sublist should be of the form (INBOX SPOOLNAME CRASHBOX) INBOX, SPOOLNAME and CRASHBOX are all strings. INBOX is the folder where you want your new mail to be moved when you type 'g' (running vm-get-new-mail) in VM. It is where you will read the mail. SPOOLNAME is where the mail system leaves your incoming mail, e.g. /var/spool/mail/kyle. It can also be a POP maildrop, provided it can be matched by the value of vm-recognize-pop-maildrops. A POP maildrop specification has the following format: \"HOST:PORT:AUTH:USER:PASSWORD\" HOST is the host name of the POP server PORT is the TCP port number to connect to (should normally be 110). USER is the user name sent to the server. PASSWORD is the secret shared by you and the server for authentication purposes. How is it used depends on the value of the AUTH parameter. If the PASSWORD is \"*\", VM will prompt you for the password the first time you try to retrieve mail from maildrop. If the password is valid, VM will not ask you for the password again during this Emacs session. AUTH is the authentication method used to convince the server you should have access to the maildrop. Acceptable values are \"pass\", \"rpop\" and \"apop\". For \"pass\", the PASSWORD is sent to the server with the POP PASS command. For \"rpop\", the PASSWORD should be the string to be sent to the server via the RPOP command. In this case the string is not really a secret; authentication is done by other means. For \"apop\", an MD5 digest of the PASSWORD appended to the server timestamp will be sent to the server with the APOP command. In order to use \"apop\" you will have to set the value of vm-pop-md5-program appropriately to point at the program that will generate the MD5 digest that VM needs. CRASHBOX is the temporary file that VM uses to store mail in between the SPOOLNAME and the INBOX. If the system crashes or Emacs dies while mail is being moved, and the new mail is not in the SPOOLNAME or the INBOX, then it will be in the CRASHBOX. There can be multiple entries with the same INBOX value, but a particular SPOOLNAME should appear only once. CRASHBOXes should not be shared among different INBOXes, but you can use the same CRASHBOX/INBOX pair with a different SPOOLNAME. NOTE: The values of vm-primary-inbox and vm-crash-box are ignored when getting new mail if vm-spool-files is a list of lists. vm-spool-files will default to the value of the shell environmental variables MAILPATH or MAIL if either of these variables are defined and no particular value for vm-spool-files has been specified.") (defvar vm-pop-md5-program "md5" "\ *Program that reads a message on its standard input and writes an MD5 digest on its output.") (defvar vm-recognize-pop-maildrops "^[^:]+:[^:]+:[^:]+:[^:]+:[^:]+" "\ *Value if non-nil should be a regular expression that matches spool names found in vm-spool-files that should be considered POP maildrops. A nil value tells VM that all the spool names are to be considered files.") (defvar vm-auto-get-new-mail t "\ *Non-nil value causes VM to automatically move mail from spool files to a mail folder when the folder is first visited. Nil means you must always use vm-get-new-mail to pull in newly arrived messages. If the value is a number, then it specifies how often (in seconds) VM should check for new mail and try to retrieve it. This is done asynchronously and may occur while you are editing other files. It should not disturb your editing, except perhaps for a pause while the work is being done.") (defvar vm-default-folder-type 'From_ "\ *Default folder type for empty folders. If VM has to add messages that have no specific folder type to an empty folder, the folder will become this default type. Allowed types are: From_ From_-with-Content-Length mmdf babyl Value must be a symbol, not a string. i.e. write (setq vm-default-folder-type 'From_) in your .emacs or .vm file. If you set this variable's value to From_-with-Content-Length you must set vm-trust-From_-with-Content-Length non-nil.") (defvar vm-check-folder-types t "\ *Non-nil value causes VM to check folder and message types for compatibility before it performs certain operations. Before saving a message to a folder, VM will check that the destination folder is of the same type as the message to be saved. Before incorporating message into a visited folder, VM will check that the messages are of the same type as that folder. A nil value means don't do the checks. Depending on the value of vm-convert-folder-types VM will either convert the messages to the appropriate type before saving or incorporating them, or it will signal an error.") (defvar vm-convert-folder-types nil "\ *Non-nil value means that when VM checks folder types and finds a mismatch (see vm-check-folder-types), it will convert the source messages to the type of the destination folder, if it can. If vm-check-folder-types is nil, then this variable isn't consulted.") (defvar vm-trust-From_-with-Content-Length nil "\ *Non-nil value means that if the first message in a folder contains a Content-Length header and begins with \"From \" VM can safely assume that all messages in the folder have Content-Length headers that specify the length of the text section of each message. VM will then use these headers to determine message boundaries instead of the usual way of searching for two newlines followed by a line that begins with \"From \". If you set vm-default-folder-type to From_-with-Content-Length you must set this variable non-nil.") (defvar vm-visible-headers '("Resent-" "From:" "Sender:" "To:" "Apparently-To:" "Cc:" "Subject:" "Date:") "\ *List of headers that should be visible when VM first displays a message. These should be listed in the order you wish them presented. Regular expressions are allowed. There's no need to anchor patterns with \"^\", as searches always start at the beginning of a line. Put a colon at the end of patterns to get exact matches. For example, \"Date\" matches \"Date\" and \"Date-Sent\". Header names are always matched case insensitively. If the value of vm-invisible-header-regexp is nil, only the headers matched by vm-visible-headers will be displayed. Otherwise all headers are displayed except those matched by vm-invisible-header-regexp. In this case vm-visible-headers specifies the order in which headers are displayed. Headers not matching vm-visible-headers are display last.") (defvar vm-invisible-header-regexp (concat "^X-VM-\\|" rmail-ignored-headers) "\ *Non-nil value should be a regular expression that tells what headers VM should NOT normally display when presenting a message. All other headers will be displayed. The variable vm-visible-headers specifies the presentation order of headers; headers not matched by vm-visible-headers are displayed last. Nil value causes VM to display ONLY those headers specified in vm-visible-headers.") (defvar vm-highlighted-header-regexp nil "\ *Value specifies which headers to highlight. This is a regular expression that matches the names of headers that should be highlighted when a message is first presented. For example setting this variable to \"From:\\\\|Subject:\" causes the From and Subject headers to be highlighted. This does not work under version 18 Emacs. Under Lucid Emacs the function `highlight-headers' is used to do highlighting. See the documentation for this function to find out how to customize header (and text) highlighting under Lucid Emacs. If `vm-highlighted-header-regexp' is non-nil, it overrides the value of `highlighted-headers-regexp'. This is so you can have different header highlighting for VM if you wish.") (defvar vm-highlighted-header-face 'highlight "\ *Face to be used to highlight headers. This variable is ignored under Lucid Emacs. See the documentation for the function `highlight-headers' to find out how to customize header highlighting under Lucid Emacs.") (defvar vm-preview-lines 0 "\ *Non-nil value N causes VM to display the visible headers + N lines of text of a message when it is first presented. The message is not actually flagged as read until it is exposed in its entirety. A value of t causes VM to display as much of the message as will fit in the window associated with the folder buffer. A nil value causes VM not to preview messages; no text lines are hidden and messages are immediately flagged as read.") (defvar vm-preview-read-messages nil "\ *Non-nil value means to preview messages even if they've already been read. A nil value causes VM to preview messages only if new or unread.") (defvar vm-auto-next-message t "\ *Non-nil value causes VM to use vm-next-message to advance to the next message in the folder if the user attempts to scroll past the end of the current messages. A nil value disables this behavior.") (defvar vm-honor-page-delimiters nil "\ *Non-nil value causes VM to honor page delimiters (as specified by the Emacs page-delimiter variable) when scrolling through a message.") (defvar vm-default-window-configuration '((startup ((((top . 70) (left . 70))) (((- (0 0 80 10) (0 10 80 40)) ((nil summary) (nil message)) ((nil nil nil t) (nil nil nil nil)))))) (quitting ((((top . 70) (left . 70))) (((0 0 80 40) ((nil message)) ((nil nil nil t)))))) (reading-message ((((top . 70) (left . 70))) (((- (0 0 80 10) (0 10 80 40)) ((nil summary) (nil message)) ((nil nil nil t) (nil nil nil nil)))))) (composing-message ((((top . 70) (left . 70))) (((- (0 0 80 10) (0 10 80 40)) ((nil summary) (nil composition)) ((nil nil nil nil) (nil nil nil t)))))) (editing-message ((((top . 70) (left . 70))) (((- (0 0 80 10) (0 10 80 40)) ((nil summary) (nil edit)) ((nil nil nil nil) (nil nil nil t)))))) (vm-summarize ((((top . 70) (left . 70))) (((- (0 0 80 10) (0 10 80 40)) ((nil summary) (nil message)) ((nil nil nil t) (nil nil nil nil))))))) "\ Default window configuration for VM if the user does not specify one. If you want to completely turn off VM's window configuration feature, set this variable and vm-window-configuration-file to nil in your .vm file. If you want to have a different window configuration setup than this, you should not set this variable directly. Rather you should set the variable vm-window-configuration-file to point at a file, and use the command vm-save-window-configuration (normally bound to `WS') to modify part of this configuration to your liking. WARNING: Don't point vm-window-configuration-file at your .vm or .emacs file. Your window configuration file should start out as an empty or nonexistent file. VM will repeatedly overwrite this file as you update your window configuration settings, so anything else you put into this file will go away.") (defvar vm-window-configuration-file "~/.vm.windows" "\ *Non-nil value should be a string that tells VM where to load and save your window configuration settings. Your window configuration settings are loaded automatically the first time you run VM in an Emacs session, and tells VM how to set up windows depending on what you are doing inside VM. The commands vm-save-window-configuration (normally bound to `WS') and vm-delete-window-configuration (bound to `WD') let you update this information; see their documentation for more information. You cannot change your window configuration setup without giving vm-window-configuration-file a non-nil value. A nil value causes VM to use the default window setup specified by the value of vm-default-window-configuration. WARNING: Don't point vm-window-configuration-file at your .vm or .emacs file. Your window configuration file should start out as an empty or nonexistent file. VM will repeatedly overwrite this file as you update your window configuration settings, so anything else you put into this file will go away.") (defvar vm-confirm-quit 0 "\ *Value of t causes VM to always ask for confirmation before quitting a VM visit of a folder. A nil value means VM will ask only when messages will be lost unwittingly by quitting, i.e. not removed by intentional delete and expunge. A value that is not nil and not t causes VM to ask only when there are unsaved changes to message attributes, or when messages will be unwittingly lost.") (defvar vm-folder-directory nil "\ *Directory where folders of mail are kept.") (defvar vm-confirm-new-folders nil "\ *Non-nil value causes interactive calls to vm-save-message to ask for confirmation before creating a new folder.") (defvar vm-delete-empty-folders t "\ *Non-nil value means remove empty (zero length) folders after saving A value of t means always remove the folders. A value of nil means never remove empty folders. A value that's not t or nil means ask before removing empty folders.") (defvar vm-flush-interval t "\ *Non-nil value specifies how often VM flushes its cached internal data. A numeric value gives the number of seconds between flushes. A value of t means flush every time there is a change. Nil means don't do flushing until a message or folder is saved. Normally when a message attribute is changed. VM keeps the record of the change in its internal memory and doesn't insert the changed data into the folder buffer until a particular message or the whole folder is saved to disk. This makes normal Emacs auto-saving useless for VM folder buffers because the information you'd want to auto-save, i.e. the attribute changes, isn't in the buffer when it is auto-saved. Setting vm-flush-interval to a numeric value will cause the VM's internal memory caches to be periodically flushed to the folder buffer. This is done non-obtrusively, so that if you type something while flushing is occurring, the flush will abort cleanly and Emacs will respond to your keystrokes as usual.") (defvar vm-visit-when-saving 0 "\ *Value determines whether VM will visit folders when saving messages. `Visiting' means that VM will read the folder into Emacs and append the message to the buffer instead of appending to the folder file directly. This behavior is ideal when folders are encrypted or compressed since appending plaintext directly to such folders is a ghastly mistake. A value of t means VM will always visit folders when saving. A nil value means VM will never visit folders before saving to them, and VM will generate an error if you attempt to save messages to a folder that is being visited. The latter restriction is necessary to insure that the buffer and disk copies of the folder being visited remain consistent. A value that is not nil and not t means VM will save to a folder's buffer if that folder is being visited, otherwise VM saves to the folder file itself.") (defvar vm-auto-folder-alist nil "\ *Non-nil value should be an alist that VM will use to choose a default folder name when messages are saved. The alist should be of the form ((HEADER-NAME-REGEXP (REGEXP . FOLDER-NAME) ... ...)) where HEADER-NAME-REGEXP and REGEXP are strings, and FOLDER-NAME is a string or an s-expression that evaluates to a string. If any part of the contents of the message header whose name is matched by HEADER-NAME-REGEXP is matched by the regular expression REGEXP, VM will evaluate the corresponding FOLDER-NAME and use the result as the default when prompting for a folder to save the message in. If the resulting folder name is a relative pathname, then it will be rooted in the directory named by vm-folder-directory, or the default-directory of the currently visited folder if vm-folder-directory is nil. When FOLDER-NAME is evaluated, the current buffer will contain only the contents of the header matched by HEADER-NAME-REGEXP. It is safe to modify this buffer. You can use the match data from any \\( ... \\) grouping constructs in REGEXP along with the function buffer-substring to build a folder name based on the header information. If the result of evaluating FOLDER-NAME is a list, then the list will be treated as another auto-folder-alist and will be descended recursively. Whether REGEXP is matched case sensitively depends on the value of the variable vm-auto-folder-case-fold-search. Header names are always matched case insensitively.") (defvar vm-auto-folder-case-fold-search nil "\ *Non-nil value means VM will ignore case when matching header contents while doing automatic folder selection via the variable vm-auto-folder-alist.") (defvar vm-virtual-folder-alist nil "\ *Non-nil value should be a list of virtual folder definitions. A virtual folder is a mapping of messages from one or more real folders into what appears to be a single folder. A virtual folder definition specifies which real folders should be searched for prospective messages and what the inclusion criteria are. Each virtual folder definition should have the following form: (VIRTUAL-FOLDER-NAME ( (FOLDER-NAME ...) (SELECTOR [ARG ...]) ... ) ... ) VIRTUAL-FOLDER-NAME is the name of the virtual folder being defined. This is the name by which you and VM will refer to this folder. FOLDER-NAME should be the name of a real folder. There may be more than one FOLDER-NAME listed, the SELECTORs within that sublist will apply to them all. If FOLDER-NAME is a directory, VM will assume this to mean that all the folders in that directory should be searched. The SELECTOR is a Lisp symbol that tells VM how to decide whether a message from one of the folders specified by the FOLDER-NAMEs should be included in the virtual folder. Some SELECTORs require an argument ARG; unless otherwise noted ARG may be omitted. The recognized SELECTORs are: author - matches message if ARG matches the author; ARG should be a regular expression. and - matches the message if all its argument selectors match the message. Example: (and (author \"Derek McGinty\") (new)) matches all new messages from Derek McGinty. `and' takes any number of arguments. any - matches any message. deleted - matches message if it is flagged for deletion. edited - matches message if it has been edited. filed - matched message if it has been saved with its headers. forwarded - matches message if it has been forwarded. header - matches message if ARG matches any part of the header portion of the message; ARG should be a regular expression. label - matches message if message has a label named ARG. less-chars-than - matches message if message has less than ARG characters. ARG should be a number. less-lines-than - matches message if message has less than ARG lines. ARG should be a number. more-chars-than - matches message if message has more than ARG characters. ARG should be a number. more-lines-than - matches message if message has more than ARG lines. ARG should be a number. marked - matches message if it is marked, as with vm-mark-message. new - matches message if it is new. not - matches message only if its selector argument does NOT match the message. Example: (not (deleted)) matches messages that are not deleted. or - matches the message if any of its argument selectors match the message. Example: (or (author \"Dave Weckl\") (subject \"drum\")) matches messages from Dave Weckl or messages with the word \"drum\" in their Subject header. `or' takes any number of arguments. read - matches message if it is neither new nor unread. recipient - matches message if ARG matches any part of the recipient list of the message. ARG should be a regular expression. replied - matches message if it has been replied to. sent-after - matches message if it was sent after the date ARG. A fully specified date looks like this: \"31 Dec 1999 23:59:59 GMT\" although the parts can appear in any order. You can leave out any part and it will default to the current date's value for that part, with the exception of the hh:mm:ss part which defaults to midnight. sent-before - matches message if it was sent before the date ARG. A fully specified date looks like this: \"31 Dec 1999 23:59:59 GMT\" although the parts can appear in any order. You can leave out any part and it will default to the current date's value for that part, with the exception of the hh:mm:ss part which defaults to midnight. subject - matches message if ARG matches any part of the message's subject; ARG should be a regular expression. text - matches message if ARG matches any part of the text portion of the message; ARG should be a regular expression. unread - matches message if it is old but unread. written - matches message if it has been saved without its headers. ") (defvar vm-virtual-mirror t "\ *Non-nil value causes the attributes of messages in virtual folders to mirror the changes in the attributes of the underlying real messages. Similarly, changes in the attributes of virtual messages will change the attributes of the underlying real messages. A nil value causes virtual messages to have their own distinct set of attributes, apart from the underlying real message. This variable automatically becomes buffer-local when set in any fashion. You should set this variable only in your .vm or .emacs file. Use setq-default. Once VM has been started, you should not set this variable directly, rather you should use the command vm-toggle-virtual-mirror, normally bound to `V M'.") (make-variable-buffer-local 'vm-virtual-mirror) (defvar vm-folder-read-only nil "\ *Non-nil value causes a folder to be considered unmodifiable by VM. Commands that modify message attributes or messages themselves are disallowed. Commands that add or delete messages from the folder are disallowed. Commands that scan or allow the reading of messages are allowed but the `new' and `unread' message flags are not changed by them. This variable automatically becomes buffer-local when set in any fashion. You should set this variable only in your .vm or .emacs file. Use setq-default. Once VM has been started, you should not set this variable directly, rather you should use the command vm-toggle-read-only, normally bound to C-x C-q.") (make-variable-buffer-local 'vm-folder-read-only) (defvar vm-included-text-prefix " > " "\ *String used to prefix included text in replies.") (defvar vm-keep-sent-messages 1 "\ *Non-nil value N causes VM to keep the last N messages sent from within VM. `Keep' means that VM will not kill the VM mail buffer after you send a message with C-c C-c (vm-mail-send-and-exit). A value of 0 or nil causes VM never to keep such buffers. A value of t causes VM never to kill such buffers. Note that these buffers will vanish once you exit Emacs. To keep a permanent record of your outgoing mail, use the mail-archive-file-name variable.") (defvar vm-confirm-mail-send nil "\ *Non-nil means ask before sending a mail message. This affects vm-mail-send and vm-mail-send-and-exit in Mail mode.") (defvar vm-mail-header-from nil "\ *Non-nil value should be a string that will be appear as the body of the From header in outbound mail messages. A nil value means don't insert a From header. This variable also controls the inclusion and format of the Resent-From header, when resending a message with vm-resend-message.") (defvar vm-reply-subject-prefix nil "\ *Non-nil value should be a string that VM should add to the beginning of the Subject header in replies, if the string is not already present. Nil means don't prefix the Subject header.") (defvar vm-reply-ignored-addresses nil "\ *Non-nil value should be a list of regular expressions that match addresses that VM should automatically remove from the recipient headers of replies. These addresses are removed from the headers before you are placed in the message composition buffer. So if you see an address in the header you don't want you should remove it yourself. Case is ignored when matching the addresses.") (defvar vm-reply-ignored-reply-tos nil "\ *Non-nil value should be a list of regular expressions that match addresses that, if VM finds in a message's Reply-To header, VM should ignore the Reply-To header and not use it for replies. VM will use the From header instead. Case is ignored when matching the addresses. This variable exists solely to provide a escape chute from mailing lists that add a Reply-To: mailing list header, thereby leaving no way to reply to just the author of a message.") (defvar vm-in-reply-to-format "%i" "\ *String which specifies the format of the contents of the In-Reply-To header that is generated for replies. See the documentation for the variable vm-summary-format for information on what this string may contain. The format should *not* end with a newline. Nil means don't put an In-Reply-To header in replies.") (defvar vm-included-text-attribution-format "%F writes:\n" "\ *String which specifies the format of the attribution that precedes the included text from a message in a reply. See the documentation for the variable vm-summary-format for information on what this string may contain. Nil means don't attribute included text in replies.") (defvar vm-included-text-headers nil "\ *List of headers that should be retained in a message included in a reply. These should be listed in the order you wish them to appear in the included text. Regular expressions are allowed. There's no need to anchor patterns with \"^\", as searches always start at the beginning of a line. Put a colon at the end of patterns to get exact matches. (E.g. \"Date\" matches \"Date\" and \"Date-Sent\".) Header names are always matched case insensitively. If the value of vm-included-text-discard-header-regexp is nil, the headers matched by vm-included-text-headers are the only headers that will be retained. If vm-included-text-discard-header-regexp is non-nil, then only headers matched by that variable will be omitted; all others will be included. vm-included-text-headers determines the header order in that case, with headers not matching any in the vm-included-text-headers list appearing last in the header section of the included text.") (defvar vm-included-text-discard-header-regexp nil "\ *Non-nil value should be a regular expression header that tells what headers should not be retained in a message included in a reply. This variable along with vm-included-text-headers determines which headers are retained. If the value of vm-included-text-discard--header-regexp is nil, the headers matched by vm-included-text-headers are the only headers that will be retained. If vm-included-text-discard-header-regexp is non-nil, then only headers matched by this variable will not be retained; all others will be included. vm-included-text-headers determines the header order in that case, with headers not matching any in the vm-included-text-headers list appearing last in the header section of the included text.") (defvar vm-forwarding-subject-format "forwarded message from %F" "\ *String which specifies the format of the contents of the Subject header that is generated for a forwarded message. See the documentation for the variable vm-summary-format for information on what this string may contain. The format should *not* end with nor contain a newline. Nil means leave the Subject header empty when forwarding.") (defvar vm-forwarded-headers nil "\ *List of headers that should be forwarded by vm-forward-message. These should be listed in the order you wish them to appear in the forwarded message. Regular expressions are allowed. There's no need to anchor patterns with \"^\", as searches always start at the beginning of a line. Put a colon at the end of patterns to get exact matches. (E.g. \"Date\" matches \"Date\" and \"Date-Sent\".) Header names are always matched case insensitively. If the value of vm-unforwarded-header-regexp is nil, the headers matched by vm-forwarded-headers are the only headers that will be forwarded. If vm-unforwarded-header-regexp is non-nil, then only headers matched by that variable will be omitted; all others will be forwarded. vm-forwarded-headers determines the forwarding order in that case, with headers not matching any in the vm-forwarded-headers list appearing last in the header section of the forwarded message.") (defvar vm-unforwarded-header-regexp "only-drop-this-header" "\ *Non-nil value should be a regular expression header that tells what headers should not be forwarded by vm-forward-message. This variable along with vm-forwarded-headers determines which headers are forwarded. If the value of vm-unforwarded-header-regexp is nil, the headers matched by vm-forwarded-headers are the only headers that will be forwarded. If vm-unforwarded-header-regexp is non-nil, then only headers matched by this variable will not be forwarded; all others will be forwarded. vm-forwarded-headers determines the forwarding order in that case, with headers not matching any in the vm-forwarded-headers list appearing last in the header section of the forwarded message.") (defvar vm-forwarding-digest-type "rfc934" "\ *Non-nil value should be a string that specifies the type of message encapsulation format to use when forwarding a message. Legal values of this variable are: \"rfc934\" \"rfc1153\" nil A nil value means don't use a digest, just mark the beginning and end of the forwarded message.") (defvar vm-digest-preamble-format "\"%s\" (%F)" "\ *String which specifies the format of the preamble lines generated by vm-send-digest when it is invoked with a prefix argument. One line will be generated for each message put into the digest. See the documentation for the variable vm-summary-format for information on what this string may contain. The format should *not* end with nor contain a newline.") (defvar vm-digest-center-preamble t "\ *Non-nil value means VM will center the preamble lines that precede the start of a digest. How the lines will be centered depends on the ambient value of fill-column. A nil value suppresses centering.") (defvar vm-digest-identifier-header-format "X-Digest: %s\n" "\ *Header to insert into messages burst from a digest. Value should be a format string of the same type as vm-summary-format that describes a header to be inserted into each message burst from a digest. The format string must end with a newline.") (defvar vm-digest-burst-type "rfc934" "\ *Value specifies the default digest type offered by vm-burst-digest when it asks you what type of digest you want to unpack. Allowed values of this variable are: \"rfc934\" \"rfc1153\" \"guess\" If the value is \"guess\", and you take the default response when vm-burst-digest queries you, VM will try to guess the digest type.") (defvar vm-digest-send-type "rfc934" "\ *String that specifies the type of digest vm-send-digest will use. Legal values of this variable are: \"rfc934\" \"rfc1153\" ") (defvar vm-rfc934-digest-headers '("Resent-" "From:" "Sender:" "To:" "Cc:" "Subject:" "Date:" "Message-ID:" "Keywords:") "\ *List of headers that should be appear in RFC 934 digests created by VM. These should be listed in the order you wish them to appear in the digest. Regular expressions are allowed. There's no need to anchor patterns with \"^\", as searches always start at the beginning of a line. Put a colon at the end of patterns to get exact matches. (E.g. \"Date\" matches \"Date\" and \"Date-Sent\".) Header names are always matched case insensitively. If the value of vm-rfc934-digest-discard-header-regexp is nil, the headers matched by vm-rfc934-digest-headers are the only headers that will be kept. If vm-rfc934-digest-discard-header-regexp is non-nil, then only headers matched by that variable will be discarded; all others will be kept. vm-rfc934-digest-headers determines the order of appearance in that case, with headers not matching any in the vm-rfc934-digest-headers list appearing last in the headers of the digestified messages.") (defvar vm-rfc934-digest-discard-header-regexp nil "\ *Non-nil value should be a regular expression header that tells what headers should not appear in RFC 934 digests created by VM. This variable along with vm-rfc934-digest-headers determines which headers are kept and which are discarded. If the value of vm-rfc934-digest-discard-header-regexp is nil, the headers matched by vm-rfc934-digest-headers are the only headers that will be kept. If vm-rfc934-digest-discard-header-regexp is non-nil, then only headers matched by this variable will be discarded; all others will be kept. vm-rfc934-digest-headers determines the order of appearance in that case, with headers not matching any in the vm-rfc934-digest-headers list appearing last in the headers of the digestified messages.") (defvar vm-rfc1153-digest-headers '("Resent-" "Date:" "From:" "Sender:" "To:" "Cc:" "Subject:" "Message-ID:" "Keywords:") "\ *List of headers that should be appear in RFC 1153 digests created by VM. These should be listed in the order you wish them to appear in the digest. Regular expressions are allowed. There is no need to anchor patterns with \"^\", as searches always start at the beginning of a line. Put a colon at the end of patterns to get exact matches. (E.g. \"Date\" matches \"Date\" and \"Date-Sent\".) Header names are always matched case insensitively. If the value of vm-rfc1153-digest-discard-header-regexp is nil, the headers matched by vm-rfc1153-digest-headers are the only headers that will be kept. If vm-rfc1153-digest-discard-header-regexp is non-nil, then only headers matched by that variable will be discarded; all others will be kept. vm-rfc1153-digest-headers determines the order of appearance in that case, with headers not matching any in the vm-rfc1153-digest-headers list appearing last in the headers of the digestified messages.") (defvar vm-rfc1153-digest-discard-header-regexp "\\(X400-\\)?Received:" "\ *Non-nil value should be a regular expression header that tells what headers should not appear in RFC 1153 digests created by VM. This variable along with vm-rfc1153-digest-headers determines which headers are kept and which headers are discarded. If the value of vm-rfc1153-digest-discard-header-regexp is nil, the headers matched by vm-rfc1153-digest-headers are the only headers that will be kept. If vm-rfc1153-digest-discard-header-regexp is non-nil, then only headers matched by this variable will be discarded; all others will be kept. vm-rfc1153-digest-headers determines the order of appearance in that case, with headers not matching any in the vm-rfc1153-digest-headers list appearing last in the headers of the digestified messages.") (defvar vm-resend-bounced-headers '("Resent-" "From:" "Sender:" "To:" "Cc:" "Subject:" "Newsgroups:" "In-Reply-To:" "References:" "Keywords:" "X-") "\ *List of headers that should be appear in messages resent with vm-resend-bounced-message. These should be listed in the order you wish them to appear in the message. Regular expressions are allowed. There is no need to anchor patterns with \"^\", as searches always start at the beginning of a line. Put a colon at the end of patterns to get exact matches. (E.g. \"Date\" matches \"Date\" and \"Date-Sent\".) Header names are always matched case insensitively. If the value of vm-resend-bounced-discard-header-regexp is nil, the headers matched by vm-resend-bounced-headers are the only headers that will be kept. If vm-resend-bounced-discard-header-regexp is non-nil, then only headers matched by that variable will be discarded; all others will be kept. vm-resend-bounced-headers determines the order of appearance in that case, with headers not matching any in the vm-resend-bounced-headers list appearing last in the headers of the message.") (defvar vm-resend-bounced-discard-header-regexp nil "\ *Non-nil value should be a regular expression that tells what headers should not appear in a resent bounced message. This variable along with vm-resend-bounced-headers determines which headers are kept and which headers are discarded. If the value of vm-resend-bounced-discard-header-regexp is nil, the headers matched by vm-resend-bounced-headers are the only headers that will be kept. If vm-resend-bounced-discard-header-regexp is non-nil, then only headers matched by this variable will be discarded; all others will be kept. vm-resend-bounced-headers determines the order of appearance in that case, with headers not matching any in the vm-resend-bounced-headers list appearing last in the headers of the message.") (defvar vm-resend-headers nil "\ *List of headers that should be appear in messages resent with vm-resend-message. These should be listed in the order you wish them to appear in the message. Regular expressions are allowed. There is no need to anchor patterns with \"^\", as searches always start at the beginning of a line. Put a colon at the end of patterns to get exact matches. (E.g. \"Date\" matches \"Date\" and \"Date-Sent\".) Header names are always matched case insensitively. If the value of vm-resend-discard-header-regexp is nil, the headers matched by vm-resend-headers are the only headers that will be kept. If vm-resend-discard-header-regexp is non-nil, then only headers matched by that variable will be discarded; all others will be kept. vm-resend-headers determines the order of appearance in that case, with headers not matching any in the vm-resend-headers list appearing last in the headers of the message.") (defvar vm-resend-discard-header-regexp "\\(\\(X400-\\)?Received:\\|Resent-\\)" "\ *Non-nil value should be a regular expression that tells what headers should not appear in a resent message. This variable along with vm-resend-bounced-headers determines which headers are kept and which headers are discarded. If the value of vm-resend-discard-header-regexp is nil, the headers matched by vm-resend--headers are the only headers that will be kept. If vm-resend-discard-header-regexp is non-nil, then only headers matched by this variable will be discarded; all others will be kept. vm-resend-headers determines the order of appearance in that case, with headers not matching any in the vm-resend-headers list appearing last in the headers of the message.") (defvar vm-summary-format "%n %*%a %-17.17F %-3.3m %2d %4l/%-5c %I\"%s\"\n" "\ *String which specifies the message summary line format. The string may contain the printf-like `%' conversion specifiers which substitute information about the message into the final summary line. Recognized specifiers are: a - attribute indicators (always four characters wide) The first char is `D', `N', `U' or ` ' for deleted, new, unread and read messages respectively. The second char is `F', `W' or ` ' for filed (saved) or written messages. The third char is `R', `Z' or ` ' for messages replied to, and forwarded messages. The fourth char is `E' if the message has been edited, ` ' otherwise. A - longer version of attributes indicators (seven characters wide) The first char is `D', `N', `U' or ` ' for deleted, new, unread and read messages respectively. The second is `r' or ` ', for message replied to. The third is `z' or ` ', for messages forwarded. The fourth is `b' or ` ', for messages redistributed. The fifth is `f' or ` ', for messages filed. The sixth is `w' or ` ', for messages written. The seventh is `e' or ` ', for messages that have been edited. c - number of characters in message (ignoring headers) d - numeric day of month message sent f - author's address F - author's full name (same as f if full name not found) h - hour:min:sec message sent H - hour:min message sent i - message ID I - thread indention l - number of lines in message (ignoring headers) L - labels (as a comma list) m - month message sent M - numeric month message sent (January = 1) n - message number s - message subject t - addresses of the recipients of the message, in a comma-separated list T - full names of the recipients of the message, in a comma-separated list If a full name cannot be found, the corresponding address is used instead. U - user defined specifier. The next character in the format string should be a letter. VM will call the function vm-summary-function- (e.g. vm-summary-function-A for \"%UA\") in the folder buffer with the message being summarized bracketed by (point-min) and (point-max). The function will be passed a message struct as an argument. The function should return a string, which VM will insert into the summary as it would for information from any other summary specifier. w - day of the week message sent y - year message sent z - timezone of date when the message was sent * - `*' if the message is marked, ` ' otherwise Use %% to get a single %. A numeric field width may be given between the `%' and the specifier; this causes right justification of the substituted string. A negative field width causes left justification. The field width may be followed by a `.' and a number specifying the maximum allowed length of the substituted string. If the string is longer than this value the right end of the string is truncated. If the value is negative, the string is truncated on on the left instead of the right. The summary format need not be one line per message but it must end with a newline, otherwise the message pointer will not be displayed correctly in the summary window.") (defvar vm-summary-arrow "->" "\ *String that is displayed to the left of the summary of the message VM consider to be the current message. The value takes effect when the summary buffer is created. Changing this variable's value has no effect on existing summary buffers.") (defvar vm-summary-highlight-face nil "\ *Face to use to highlight the summary entry for the current message. Nil means don't highlight the current message's summary entry.") (defvar vm-summary-show-threads nil "\ *Non-nil value means VM should display and maintain message thread trees in the summary buffer. This means that messages with a common ancestor will be displayed contiguously in the summary. (If you have vm-move-messages-physically set non-nil the folder itself will be reordered to match the thread ordering.) If you use the `%I' summary format specifier in your vm-summary-format, indention will be provided as described in the documentation for vm-summary-thread-indent-level (which see). A nil value means don't display thread information. The `%I' specifier does nothing in the summary format. This variable automatically becomes buffer-local when set in any fashion. You should set this variable only in your .vm or .emacs file. Use setq-default. Once VM has been started, you should not set this variable directly, rather you should use the command vm-toggle-threads-display, normally bound to C-t.") (make-variable-buffer-local 'vm-summary-show-threads) (defvar vm-summary-thread-indent-level 2 "\ *Value should be a number that specifies how much indention the '%I' summary format specifier should provide per thread level. A message's `thread level' refers to the number of direct ancestors from the message to the oldest ancestor the message has that is in the current folder. For example, the first message of a thread is generally a message about a new topic, e.g. a message that is not a reply to some other message. Therefore it has no ancestor and would cause %I to generate no indention. A reply to this message will be indented by the value of vm-summary-thread-indent-level. A reply to that reply will be indented twice the value of vm-summary-thread-indent-level.") (defvar vm-summary-uninteresting-senders nil "\ *Non-nil value should be a regular expressions that matches addresses that you don't consider interesting enough to appear in the summary. When such senders would be displayed by the %F or %f summary format specifiers VM will substitute the value of vm-summary-uninteresting-senders-arrow (default \"To: \") followed by what would be shown by the %T and %t specifiers respectively.") (defvar vm-summary-uninteresting-senders-arrow "To: " "\ *String to display before the string that is displayed instead of an \"uninteresting\" sender. See vm-summary-uninteresting-senders.") (defvar vm-auto-center-summary nil "\ *Value controls whether VM will keep the summary arrow vertically centered within the summary window. A value of t causes VM to always keep arrow centered. A value of nil means VM will never bother centering the arrow. A value that is not nil and not t causes VM to center the arrow only if the summary window is not the only existing window.") (defvar vm-summary-subject-no-newlines t "\ *Non-nil value means VM should replace newlines with spaces in the subject displayed in the summary.") (defvar vm-subject-ignored-prefix "^\\(re: *\\)+" "\ *Non-nil value should be a regular expression that matches strings at the beginning of the Subject header that you want VM to ignore when threading, sorting, marking, and killing messages by subject. Matches are done case-insensitively.") (defvar vm-subject-ignored-suffix "\\( (fwd)\\| \\)+$" "\ *Non-nil value should be a regular expression that matches strings at the end of the Subject header that you want VM to ignore when threading, sorting, marking and killing messages by subject. Matches are done case-insensitively.") (defvar vm-mutable-windows pop-up-windows "\ *This variable's value controls VM's window usage. A value of t gives VM free run of the Emacs display; it will commandeer the entire screen for its purposes. A value of nil restricts VM's window usage to the window from which it was invoked. VM will not create, delete, or use any other windows, nor will it resize its own window. A value that is neither t nor nil allows VM to create and delete windows within the window in which it was started. That is, VM will use its root window as if it were the whole screen.") (defvar vm-mutable-frames nil "\ *Non-nil value means VM is allowed to create and destroy frames to display and undisplay buffers. VM can create a frame to display a buffer, and delete frame to undisplay a buffer. A nil value means VM should not create or delete frames. This does not apply to the VM commands whose names end in -other-frame, which always create a new frame. This variable has no meaning if you're not running Emacs native under X Windows.") (defvar vm-startup-with-summary nil "\ *Value tells VM whether to generate a summary when a folder is visited. Nil means don't automatically generate a summary. A value of t means always generate a summary. A positive numeric value N means only generate a summary if there are N or more messages. A negative numeric value -N means only generate a summary if there are N or less messages.") (defvar vm-follow-summary-cursor nil "\ *Non-nil value causes VM to select the message under the cursor in the summary window before executing commands that operate on the current message. This occurs only when the summary buffer window is the selected window.") (defvar vm-jump-to-new-messages t "\ *Non-nil value causes VM to jump to the first new message whenever such messages arrive in a folder or the first time a folder is visited. See also vm-jump-to-unread-messages.") (defvar vm-jump-to-unread-messages t "\ *Non-nil value causes VM to jump to the first unread message whenever such messages arrive in a folder or the first time a folder is visited. New messages are considered unread in this context so new messages will be jumped to as well. The value of vm-jump-to-new-messages takes precedence over the setting of this variable. So if there are unread messages and new messages VM will jump to the first new message, even if an unread message appears before it in the folder, provided vm-jump-to-new-messages is non-nil.") (defvar vm-skip-deleted-messages t "\ *Non-nil value causes VM's `n' and 'p' commands to skip over deleted messages. A value of t causes deleted messages to always be skipped. A value that is not nil and not t causes deleted messages to be skipped only if there are other messages that are not flagged for deletion in the desired direction of motion.") (defvar vm-skip-read-messages nil "\ *Non-nil value causes VM's `n' and `p' commands to skip over messages that have already been read, in favor of new or unread messages. A value of t causes read messages to always be skipped. A value that is not nil and not t causes read messages to be skipped only if there are unread messages in the desired direction of motion.") (defvar vm-move-after-deleting nil "\ *Non-nil value causes VM's `d' command to automatically invoke vm-next-message or vm-previous-message after deleting, to move past the deleted messages. A value of t means motion should honor the value of vm-circular-folders. A value that is not t and not nil means that motion should be done as if vm-circular-folders is set to nil.") (defvar vm-move-after-undeleting nil "\ *Non-nil value causes VM's `u' command to automatically invoke vm-next-message or vm-previous-message after undeleting, to move past the undeleted messages. A value of t means motion should honor the value of vm-circular-folders. A value that is not t and not nil means that motion should be done as if vm-circular-folders is set to nil.") (defvar vm-delete-after-saving nil "\ *Non-nil value causes VM automatically to mark messages for deletion after successfully saving them to a folder.") (defvar vm-delete-after-archiving nil "\ *Non-nil value causes VM automatically to mark messages for deletion after successfully auto-archiving them with the vm-auto-archive-messages command.") (defvar vm-delete-after-bursting nil "\ *Non-nil value causes VM automatically to mark a message for deletion after it has been successfully burst by the vm-burst-digest command.") (defvar vm-circular-folders 0 "\ *Value determines whether VM folders will be considered circular by various commands. `Circular' means VM will wrap from the end of the folder to the start and vice versa when moving the message pointer, or deleting, undeleting or saving messages before or after the current message. A value of t causes all VM commands to consider folders circular. A value of nil causes all of VM commands to signal an error if the start or end of the folder would have to be passed to complete the command. For movement commands, this occurs after the message pointer has been moved as far as possible in the specified direction. For other commands, the error occurs before any part of the command has been executed, i.e. no deletions, saves, etc. will be done unless they can be done in their entirety. A value that is not nil and not t causes only VM's movement commands to consider folders circular. Saves, deletes and undelete commands will behave the same as if the value is nil.") (defvar vm-mark-search-whole-folder t "\ *Whether marking commands should operate on the whole folder, rather limiting their search to the messages from the selected message onward.") (defvar vm-search-using-regexps nil "\ *Non-nil value causes VM's search command to interpret user input as a regular expression instead of as a literal string.") (defvar vm-move-messages-physically nil "\ *Non-nil value causes VM's commands that change the message order of a folder to always move the physical messages involved and not just change the presentation order. Nil means that commands just change the order in which VM displays messages and leave the folder itself undisturbed.") (defvar vm-edit-message-mode 'text-mode "\ *Major mode to use when editing messages in VM.") (defvar vm-berkeley-mail-compatibility (memq system-type '(berkeley-unix)) "\ *Non-nil means to read and write BSD Mail(1) style Status: headers. This makes sense if you plan to use VM to read mail archives created by Mail.") (defvar vm-strip-reply-headers nil "\ *Non-nil value causes VM to strip away all comments and extraneous text from the headers generated in reply messages. If you use the \"fakemail\" program as distributed with Emacs, you probably want to set this variable to to t, because as of Emacs v18.52 \"fakemail\" could not handle unstripped headers.") (defvar vm-inhibit-startup-message nil "\ *Non-nil causes VM not to display its copyright notice, disclaimers etc. when started in the usual way.") (defvar vm-select-new-message-hook nil "\ *List of hook functions called every time a message with the 'new' attribute is made to be the current message. When the hooks are run the current buffer will be the folder containing the message and the start and end of the message will be bracketed by (point-min) and (point-max).") (defvar vm-select-unread-message-hook nil "\ *List of hook functions called every time a message with the 'unread' attribute is made to be the current message. When the hooks are run the current buffer will be the folder containing the message and the start and end of the message will be bracketed by (point-min) and (point-max).") (defvar vm-select-message-hook nil "\ *List of hook functions called every time a message is made to be the current message. When the hooks are run the current buffer will be the folder containing the message and the start and end of the message will be bracketed by (point-min) and (point-max).") (defvar vm-arrived-message-hook nil "\ *List of hook functions called once for each message gathered from the system mail spool, or from another folder with vm-get-new-mail. When the hooks are run the current buffer will be the folder containing the message and the start and end of the message will be bracketed by (point-min) and (point-max).") (defvar vm-reply-hook nil "\ *List of hook functions to be run after a Mail mode composition buffer has been created for a reply. VM runs this hook and then runs vm-mail-mode-hook before leaving the user in the Mail mode buffer.") (defvar vm-forward-message-hook nil "\ *List of hook functions to be run after a Mail mode composition buffer has been created to forward a message. VM runs this hook and then runs vm-mail-mode-hook before leaving the user in the Mail mode buffer.") (defvar vm-resend-bounced-message-hook nil "\ *List of hook functions to be run after a Mail mode composition buffer has been created to resend a bounced message. VM runs this hook and then runs vm-mail-mode-hook before leaving the user in the Mail mode buffer.") (defvar vm-resend-message-hook nil "\ *List of hook functions to be run after a Mail mode composition buffer has been created to resend a message. VM runs this hook and then runs vm-mail-mode-hook before leaving the user in the Mail mode buffer.") (defvar vm-send-digest-hook nil "\ *List of hook functions to be run after a Mail mode composition buffer has been created to send a digest. VM runs this hook and then runs vm-mail-mode-hook before leaving the user in the Mail mode buffer.") (defvar vm-mail-hook nil "\ *List of hook functions to be run after a Mail mode composition buffer has been created to send a non specialized message, i.e. a message that is not a reply, forward, digest, etc. VM runs this hook and then runs vm-mail-mode-hook before leaving the user in the Mail mode buffer.") (defvar vm-summary-redo-hook nil "\ *List of hook functions called just after VM adds or deletes entries from a folder summary.") (defvar vm-visit-folder-hook nil "\ *List of hook functions called just after VM visits a folder. It doesn't matter if the folder buffer already exists, this hook is run each time vm or vm-visit-folder is called interactively It is NOT run after vm-mode is called.") (defvar vm-retrieved-spooled-mail-hook nil "\ *List of hook functions called just after VM has retrieved a group of messages from your system mailbox(es). When the hooks are run, the current buffer will be the folder where the messages were incorporated.") (defvar vm-edit-message-hook nil "\ *List of hook functions to be run just before a message is edited. This is the last thing vm-edit-message does before leaving the user in the edit buffer.") (defvar vm-mail-mode-hook nil "\ *List of hook functions to be run after a Mail mode composition buffer has been created. This is the last thing VM does before leaving the user in the Mail mode buffer.") (defvar vm-mode-hook nil "\ *List of hook functions to run when a buffer enters vm-mode. These hook functions should generally be used to set key bindings and local variables.") (defvar vm-mode-hooks nil "\ *Old name for vm-mode-hook. Supported for backward compatibility. You should use the new name.") (defvar vm-summary-mode-hook nil "\ *List of hook functions to run when a VM summary buffer is first created. The current buffer will be the summary buffer when the hooks are run.") (defvar vm-summary-mode-hooks nil "\ *Old name for vm-summary-mode-hook. Supported for backward compatibility. You should use the new name.") (defvar vm-quit-hook nil "\ *List of hook functions to run when you quit VM. This applies to any VM quit command.") (defvar vm-summary-pointer-update-hook nil "\ *List of hook functions to run when VM summary pointer is updated. When the hooks are run, the current buffer will be the summary buffer.") (defvar vm-display-buffer-hook nil "\ *List of hook functions that are run every time VM wants to display a buffer. When the hooks are run the current buffer will be the buffer that VM wants to display. The hooks are expected to select a window and VM will display the buffer in that window. If you use display hooks, you should probably not use VM's builtin window configuration system as the result is likely to be confusing.") (defvar vm-undisplay-buffer-hook nil "\ *List of hook functions that are run every time VM wants to remove a buffer from the display. When the hooks are run the current buffer will be the buffer that VM wants to disappear. The hooks are expected to do the work of removing the buffer from the display. The hook functions should not kill the buffer. If you use undisplay hooks, you should probably not use VM's builtin window configuration system as the result is likely to be confusing.") (defvar mail-yank-hooks nil "\ Hooks called after a message is yanked into a mail composition. (This hook is deprecated, you should use mail-citation-hook instead.) Value is a list of functions to be run. Each hook function can find the newly yanked message between point and mark. Each hook function should return with point and mark around the yanked message. See the documentation for vm-yank-message to see when VM will run these hooks.") (defvar mail-citation-hook nil "\ *Hook for modifying a citation just inserted in the mail buffer. Each hook function can find the citation between (point) and (mark t). And each hook function should leave point and mark around the citation text as modified. If this hook is entirely empty (nil), a default action is taken instead of no action.") (defvar mail-default-headers nil "\ *A string containing header lines, to be inserted in outgoing messages. It is inserted before you edit the message, so you can edit or delete these lines.") (defvar mail-signature nil "\ *Text inserted at end of mail buffer when a message is initialized. If t, it means to insert the contents of the file `~/.signature'.") (defvar vm-movemail-program "movemail" "\ *Name of program to use to move mail from the system spool to another location. Normally this should be the movemail program distributed with Emacs.") (defvar vm-tale-is-an-idiot nil "\ *Non-nil value causes vm-mail-send to check multi-line recipient headers of outbound mail for lines that don't end with a comma. If such a line is found, an error is signaled and the mail is not sent.") (defvar vm-maintainer-address "bug-vm@uunet.uu.net" "\ Where to send VM bug reports.") (defvar vm-mode-map (byte-code "  \" \" ! # # # # # # # # # # # # # # # # # # # # # # # # # # # # @A# BC# DE# FG# HI# JK# LM# NO# PQ# RS# TU# VW# XY# Z[# \\]# ^_# `a# bc# de# fg# hg# ij# kl# mn# op# q# rs# tu # vw# xy# zu # {|# }~# # # # u # # # # # # # # # # # # # # # # u # # # # # # # # # # # # )" [make-keymap map string-match "Lucid" emacs-version set-keymap-name vm-mode-map suppress-keymap define-key "h" vm-summarize "" vm-next-unread-message "" vm-previous-unread-message "n" vm-next-message "p" vm-previous-message "N" vm-next-message-no-skip "P" vm-previous-message-no-skip "" vm-move-message-forward "" vm-move-message-backward " " vm-goto-message-last-seen " " vm-goto-message "^" vm-goto-parent-message "t" vm-expose-hidden-headers " " vm-scroll-forward "b" vm-scroll-backward "" "d" vm-delete-message "" vm-delete-message-backward "u" vm-undelete-message "U" vm-unread-message "e" vm-edit-message "a" vm-set-message-attributes "j" vm-discard-cached-data "k" vm-kill-subject "f" vm-followup "F" vm-followup-include-text "r" vm-reply "R" vm-reply-include-text "" vm-resend-bounced-message "B" vm-resend-message "z" vm-forward-message "c" vm-continue-composing-message "@" vm-send-digest "*" vm-burst-digest "m" vm-mail "g" vm-get-new-mail "G" vm-sort-messages "v" vm-visit-folder "s" vm-save-message "w" vm-save-message-sans-headers "A" vm-auto-archive-messages "S" vm-save-folder "|" vm-pipe-message-to-command "#" vm-expunge-folder "q" vm-quit "x" vm-quit-no-change "?" vm-help "" vm-undo "u" "!" shell-command "<" vm-beginning-of-message ">" vm-end-of-message "" vm-isearch-forward "=" "L" vm-load-init-file "l" make-sparse-keymap "la" vm-add-message-labels "ld" vm-delete-message-labels "V" "VV" vm-visit-virtual-folder "VC" vm-create-virtual-folder "VA" vm-apply-virtual-folder "VM" vm-toggle-virtual-mirror "V?" vm-virtual-help "M" "MN" vm-next-command-uses-marks "Mn" "MM" vm-mark-message "MU" vm-unmark-message "Mm" vm-mark-all-messages "Mu" vm-clear-all-marks "MC" vm-mark-matching-messages "Mc" vm-unmark-matching-messages "MT" vm-mark-thread-subtree "Mt" vm-unmark-thread-subtree "MS" vm-mark-messages-same-subject "Ms" vm-unmark-messages-same-subject "MA" vm-mark-messages-same-author "Ma" vm-unmark-messages-same-author "M?" vm-mark-help "W" "WW" vm-apply-window-configuration "WS" vm-save-window-configuration "WD" vm-delete-window-configuration "W?" vm-window-help "" vm-toggle-threads-display "" vm-save-buffer "" vm-write-file "" vm-toggle-read-only "%" vm-change-folder-type "" vm-show-copying-restrictions "" vm-show-no-warranty] 4) "\ Keymap for VM mode.") (defvar vm-summary-mode-map (byte-code "\n\"  \" \" )" [string-match "Lucid" emacs-version make-sparse-keymap map set-keymap-name vm-summary-mode-map set-keymap-parent vm-mode-map] 3) "\ Keymap for VM Summary mode") (defvar vm-mail-mode-map (byte-code "!\"  \"  \" ! #@@@A@@8 \"C @#Ao,AB) )" [nil map require sendmail string-match "Lucid" emacs-version make-sparse-keymap set-keymap-name vm-mail-mode-map set-keymap-parent mail-mode-map copy-keymap define-key "" vm-mode-map ((mail-yank-original vm-yank-message "") (mail-send vm-mail-send "") (mail-send-and-exit vm-mail-send-and-exit "")) substitutions old new 2 def where-is-internal wi] 5) "\ Keymap for VM Mail mode buffers.") (defvar vm-edit-message-map (byte-code "  \" \" \"  # # # # )" [make-sparse-keymap map string-match "Lucid" emacs-version set-keymap-name vm-edit-message-map set-keymap-parent text-mode-map define-key "" vm-mode-map "" vm-edit-message-end "" "" vm-edit-message-abort] 4) "\ Keymap for the buffers created by VM's vm-edit-message command.") (byte-code "!!!!!!!!!!!!! !!\n!! !! !! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!\"!!#!!$!!%!!&!!'!!(!!)!*!+!-!/!0!1!2!3579;=?@ABCDEFGHIJKLMNOPQRSTUV!WX\"VYZ[\\]^_`abc!cde‡" [boundp vm-folder-type nil make-variable-buffer-local vm-message-list vm-virtual-folder-definition vm-virtual-buffers vm-real-buffers vm-message-pointer vm-message-order-changed vm-message-order-header-present vm-last-message-pointer vm-mail-buffer vm-summary-buffer vm-summary-pointer vm-system-state vm-undo-record-list vm-saved-undo-record-list vm-undo-record-pointer vm-last-save-folder vm-last-written-file vm-last-visit-folder vm-last-pipe-command vm-messages-not-on-disk 0 vm-totals vm-modification-counter vm-flushed-modification-counter vm-messages-needing-summary-update vm-buffers-needing-display-update vm-numbering-redo-start-point vm-numbering-redo-end-point vm-summary-redo-start-point vm-need-summary-pointer-update vm-thread-obarray vm-thread-subject-obarray vm-label-obarray vm-block-new-mail vm-root-window-edges vm-saved-buffer-modified-p vm-mark-count vm-kept-mail-buffers vm-inhibit-write-file-hook vm-chop-full-name-function vm-choose-chop-full-name-function vm-session-beginning t vm-init-file-loaded vm-window-configurations vm-window-configuration vm-message-id-number rmail-spool-directory "/usr/spool/mail/" vm-spool-directory "^Content-Length:.*\n\\|\\(\n\n\\)" vm-content-length-search-regexp "Content-Length:" vm-content-length-header "^X-VM-\\(Attributes\\|v5-Data\\):\\(.*\n\\([ ].*\n\\)*\\)" vm-attributes-header-regexp "X-VM-v5-Data:" vm-attributes-header "^X-VM-Message-Order:" vm-message-order-header-regexp "X-VM-Message-Order:" vm-message-order-header "^X-VM-Bookmark:" vm-bookmark-header-regexp "X-VM-Bookmark:" vm-bookmark-header "^X-VM-Summary-Format:" vm-summary-header-regexp "X-VM-Summary-Format:" vm-summary-header "^X-VM-VHeader:" vm-vheader-header-regexp "X-VM-VHeader:" vm-vheader-header "^X-VM-Labels:" vm-labels-header-regexp "X-VM-Labels:" vm-labels-header "Status: " vm-berkeley-mail-status-header "^Status: \\(..?\\)\n" vm-berkeley-mail-status-header-regexp vm-matched-header-vector make-vector 6 ("From_" "From_-with-Content-Length" "mmdf" "babyl") vm-supported-folder-types (("default") ("startup") ("quitting") ("composing-message") ("editing-message") ("marking-message") ("reading-message") ("searching-message") ("vm-delete-message") ("vm-delete-message-backward") ("vm-undelete-message") ("vm-kill-subject") ("vm-expunge-folder") ("vm-burst-digest") ("vm-burst-rfc934-digest") ("vm-burst-rfc1153-digest") ("vm-edit-message") ("vm-discard-cached-data") ("vm-edit-message-end") ("vm-edit-message-abort") ("vm-unread-message") ("vm-quit-no-change") ("vm-quit") ("vm-save-buffer") ("vm-write-file") ("vm-save-folder") ("vm-save-and-expunge-folder") ("vm-visit-folder") ("vm-visit-folder-other-frame") ("vm-visit-folder-other-window") ("vm-help") ("vm-get-new-mail") ("vm-load-init-file") ("vm") ("vm-other-frame") ("vm-other-window") ("vm-toggle-read-only") ("vm-mode") ("vm-show-copying-restrictions") ("vm-show-no-warranty") ("vm-clear-all-marks") ("vm-mark-all-messages") ("vm-mark-message") ("vm-unmark-message") ("vm-mark-messages-same-subject") ("vm-unmark-messages-same-subject") ("vm-mark-matching-messages") ("vm-unmark-matching-messages") ("vm-mark-thread-subtree") ("vm-unmark-thread-subtree") ("vm-next-command-uses-marks") ("vm-mark-help") ("vm-submit-bug-report") ("vm-goto-message") ("vm-goto-message-last-seen") ("vm-next-message") ("vm-previous-message") ("vm-next-message-no-skip") ("vm-previous-message-no-skip") ("vm-next-unread-message") ("vm-previous-unread-message") ("vm-scroll-forward") ("vm-scroll-backward") ("vm-expose-hidden-headers") ("vm-beginning-of-message") ("vm-end-of-message") ("vm-yank-message-other-folder") ("vm-yank-message") ("vm-mail-send-and-exit") ("vm-mail-send") ("vm-reply") ("vm-reply-include-text") ("vm-followup") ("vm-followup-include-text") ("vm-forward-message") ("vm-forward-message-all-headers") ("vm-mail") ("vm-resend-bounced-message") ("vm-resend-message") ("vm-send-digest") ("vm-send-rfc934-digest") ("vm-send-rfc1153-digest") ("vm-reply-other-frame") ("vm-reply-include-text-other-frame") ("vm-followup-other-frame") ("vm-followup-include-text-other-frame") ("vm-forward-message-other-frame") ("vm-forward-message-all-headers-other-frame") ("vm-mail-other-frame") ("vm-mail-other-window") ("vm-resend-bounced-message-other-frame") ("vm-resend-message-other-frame") ("vm-send-digest-other-frame") ("vm-send-rfc934-digest-other-frame") ("vm-send-rfc1153-digest-other-frame") ("vm-continue-composing-message") ("vm-auto-archive-messages") ("vm-save-message") ("vm-save-message-sans-headers") ("vm-pipe-message-to-command") ("vm-isearch-forward") ("vm-move-message-forward") ("vm-move-message-backward") ("vm-move-message-forward-physically") ("vm-move-message-backward-physically") ("vm-sort-messages") ("vm-toggle-threads-display") ("vm-summarize") ("vm-summarize-other-frame") ("vm-undo") ("vm-visit-virtual-folder") ("vm-visit-virtual-folder-other-frame") ("vm-visit-virtual-folder-other-window")) vm-supported-window-configurations ("date" "reversed-date" "author" "reversed-author" "subject" "reversed-subject" "recipients" "reversed-recipients" "line-count" "reversed-line-count" "byte-count" "reversed-byte-count" "physical-order" "reversed-physical-order") vm-supported-sort-keys (("any") ("header") ("label") ("text") ("recipient") ("author") ("subject") ("sent-before") ("sent-after") ("more-chars-than") ("less-chars-than") ("more-lines-than") ("less-lines-than") ("new") ("unread") ("read") ("deleted") ("replied") ("forwarded") ("filed") ("written") ("edited") ("marked")) vm-supported-interactive-virtual-selectors ("new" "unread" "read" "deleted" "replied" "forwarded" "redistributed" "filed" "written" "edited" "undeleted" "unreplied" "unforwarded" "unredistributed" "unfiled" "unwritten" "unedited" "recent" "unseen" "answered" "unanswered") vm-supported-attribute-names vm-key-functions (("rfc934") ("rfc1153")) vm-digest-type-alist] 3) (defvar vm-completion-auto-correct t "\ Non-nil means that minibuffer-complete-file should aggressively erase the trailing part of a word that caused completion to fail, and retry the completion with the resulting word.") (defvar vm-minibuffer-completion-table nil "\ Completion table used by vm-minibuffer-complete-word. Should be just a list of strings, not an alist or an obarray.") (defvar vm-completion-auto-space t "\ Non-nil value means that vm-minibuffer-complete-word should automatically append a space to words that complete unambiguously.") (byte-code "   !!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!\"!!#!!$!%!&!'!(*!+!,!\"-!/!0!1!\"2!\"58\"!̇" [9 vm-attributes-vector-length 20 vm-cache-vector-length 16 vm-softdata-vector-length 6 vm-location-data-vector-length 5 vm-mirror-data-vector-length ("Please use \\[vm-submit-bug-report] to report bugs." "You may give out copies of VM. Type \\[vm-show-copying-restrictions] to see the conditions" "VM comes with ABSOLUTELY NO WARRANTY; type \\[vm-show-no-warranty] for full details" "In Stereo (where available)") vm-startup-message-lines nil vm-startup-message-displayed boundp vm-mode-line-format ("" "--%+%+-" ("VM: %b" (vm-mail-buffer (vm-ml-sort-keys ("" " by " vm-ml-sort-keys))) (vm-message-list (" " vm-ml-message-number " (of " vm-ml-highest-message-number ")") (vm-folder-type " (unrecognized folder type)" " (no messages)"))) (vm-message-list ("--%[" vm-ml-message-attributes-alist (vm-ml-labels ("; " vm-ml-labels)) "%]---") ("--%[%]---")) "%p" " " global-mode-string "-%-") vm-ml-message-attributes-alist ((vm-ml-message-new "new" (vm-ml-message-unread "unread" (vm-ml-message-read "read"))) (vm-ml-message-edited " edited") (vm-ml-message-filed " filed") (vm-ml-message-written " written") (vm-ml-message-replied " replied") (vm-ml-message-forwarded " forwarded") (vm-ml-message-redistributed " redistributed") (vm-ml-message-deleted " deleted") (vm-ml-message-marked " MARKED")) vm-ml-message-number make-variable-buffer-local vm-ml-highest-message-number vm-ml-sort-keys vm-ml-labels vm-summary-overlay vm-ml-message-new vm-ml-message-unread vm-ml-message-read vm-ml-message-edited vm-ml-message-replied vm-ml-message-forwarded vm-ml-message-redistributed vm-ml-message-deleted vm-ml-message-filed vm-ml-message-written vm-ml-message-marked vm-pop-read-point vm-reply-list vm-forward-list vm-redistribute-list current-itimer (("jan" "January" "1") ("feb" "February" "2") ("mar" "March" "3") ("apr" "April" "4") ("may" "May" "5") ("jun" "June" "6") ("jul" "July" "7") ("aug" "August" "8") ("sep" "September" "9") ("oct" "October" "10") ("nov" "November" "11") ("dec" "December" "12")) vm-month-alist vm-pop-passwords pop-up-frames vm-parse-date-workspace make-vector vm-sortable-date-alist vm-summary-=> vm-summary-no-=> vm-thread-loop-obarray 29 0 vm-delete-duplicates-obarray string-match "Lucid" emacs-version require vm-lucid] 3) ;ELC ;;; compiled by jwz@thalidomide on Sat May 21 06:35:25 1994 ;;; from file /th/jwz/emacs19/lisp/vm/vm-version.el ;;; emacs version 19.10 Lucid (beta25). ;;; bytecomp version 2.24; 26-Apr-94. ;;; optimization is on. ;;; this file uses opcodes which do not exist in Emacs 18. (if (and (boundp 'emacs-version) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19"))) (error "This file was compiled for Emacs 19.")) (provide 'vm) (defconst vm-version "5.70.L (beta)" "\ Version number of VM.") (defun vm-version nil "\ Returns the value of the variable vm-version." vm-version) (autoload (quote vm-delete-message) "vm-delete" "Add the `deleted' attribute to the current message. The message will be physically deleted from the current folder the next time the current folder is expunged. With a prefix argument COUNT, the current message and the next COUNT - 1 messages are deleted. A negative argument means the the current message and the previous COUNT - 1 messages are deleted. When invoked on marked messages (via vm-next-command-uses-marks), only marked messages are deleted, other messages are ignored." t nil) (autoload (quote vm-delete-message-backward) "vm-delete" "Like vm-delete-message, except the deletion direction is reversed." t nil) (autoload (quote vm-undelete-message) "vm-delete" "Remove the `deleted' attribute from the current message. With a prefix argument COUNT, the current message and the next COUNT - 1 messages are undeleted. A negative argument means the the current message and the previous COUNT - 1 messages are deleted. When invoked on marked messages (via vm-next-command-uses-marks), only marked messages are undeleted, other messages are ignored." t nil) (autoload (quote vm-kill-subject) "vm-delete" "Delete all messages with the same subject as the current message. Message subjects are compared after ignoring parts matched by the variables vm-subject-ignored-prefix and vm-subject-ignored-suffix." t nil) (autoload (quote vm-expunge-folder) "vm-delete" "Expunge messages with the `deleted' attribute. For normal folders this means that the deleted messages are removed from the message list and the message contents are removed from the folder buffer. For virtual folders, messages are removed from the virtual message list. If virtual mirroring is in effect for the virtual folder, the corresponding real messages are also removed from real message lists and the message contents are removed from real folders. When invoked on marked messages (via vm-next-command-uses-marks), only messages both marked and deleted are expunged, other messages are ignored." t nil) (autoload (quote vm-no-frills-encapsulate-message) "vm-digest" "Encapsulate a message M for forwarding, simply. No message encapsulation standard is used. The message is inserted at point in the current buffer, surrounded by two dashed start/end separator lines. Point is not moved. M should be a message struct for a real message, not a virtual message. This is the message that will be encapsulated. KEEP-LIST should be a list of regexps matching headers to keep. DISCARD-REGEXP should be a regexp that matches headers to be discarded. KEEP-LIST and DISCARD-REGEXP are used to order and trim the headers to be forwarded. See the docs for vm-reorder-message-headers to find out how KEEP-LIST and DISCARD-REGEXP are used." nil nil) (autoload (quote vm-rfc934-char-stuff-region) "vm-digest" "Quote RFC 934 message separators between START and END. START and END are buffer positions in the current buffer. Lines beginning with `-' in the region have `- ' prepended to them." nil nil) (autoload (quote vm-rfc934-char-unstuff-region) "vm-digest" "Unquote lines in between START and END as per RFC 934. START and END are buffer positions in the current buffer. Lines beginning with `- ' in the region have that string stripped from them." nil nil) (autoload (quote vm-rfc934-encapsulate-messages) "vm-digest" "Encapsulate the messages in MESSAGE-LIST as per RFC 934. The resulting digest is inserted at point in the current buffer. Point is not moved. MESSAGE-LIST should be a list of message structs (real or virtual). These are the messages that will be encapsulated. KEEP-LIST should be a list of regexps matching headers to keep. DISCARD-REGEXP should be a regexp that matches headers to be discarded. KEEP-LIST and DISCARD-REGEXP are used to order and trim the headers to be forwarded. See the docs for vm-reorder-message-headers to find out how KEEP-LIST and DISCARD-REGEXP are used." nil nil) (autoload (quote vm-rfc1153-char-stuff-region) "vm-digest" "Quote RFC 1153 message separators between START and END. START and END are buffer positions in the current buffer. Lines consisting only of 30 hyphens have the first hyphen converted to a space." nil nil) (autoload (quote vm-rfc1153-char-unstuff-region) "vm-digest" "Unquote lines in between START and END as per RFC 1153. START and END are buffer positions in the current buffer. Lines consisting only of a space following by 29 hyphens have the space converted to a hyphen." nil nil) (autoload (quote vm-rfc1153-encapsulate-messages) "vm-digest" "Encapsulate the messages in MESSAGE-LIST as per RFC 1153. The resulting digest is inserted at point in the current buffer. Point is not moved. MESSAGE-LIST should be a list of message structs (real or virtual). These are the messages that will be encapsulated. KEEP-LIST should be a list of regexps matching headers to keep. DISCARD-REGEXP should be a regexp that matches headers to be discarded. KEEP-LIST and DISCARD-REGEXP are used to order and trim the headers to be forwarded. See the docs for vm-reorder-message-headers to find out how KEEP-LIST and DISCARD-REGEXP are used." nil nil) (autoload (quote vm-rfc1153-or-rfc934-burst-message) "vm-digest" "Burst messages from the digest message M. M should be a message struct for a real message. If RFC1153 is non-nil, assume the digest is of the form specified by RFC 1153. Otherwise assume RFC 934 digests." nil nil) (autoload (quote vm-rfc934-burst-message) "vm-digest" "Burst messages from the RFC 934 digest message M. M should be a message struct for a real message." nil nil) (autoload (quote vm-rfc1153-burst-message) "vm-digest" "Burst messages from the RFC 1153 digest message M. M should be a message struct for a real message." nil nil) (autoload (quote vm-burst-digest) "vm-digest" "Burst the current message (a digest) into its individual messages. The digest's messages are assimilated into the folder as new mail would be. Optional argument DIGEST-TYPE is a string that tells VM what kind of digest the current message is. If it is not given the value defaults to the value of vm-digest-burst-type. When called interactively DIGEST-TYPE will be read from the minibuffer." t nil) (autoload (quote vm-burst-rfc934-digest) "vm-digest" "Burst an RFC 934 style digest" t nil) (autoload (quote vm-burst-rfc1153-digest) "vm-digest" "Burst an RFC 1153 style digest" t nil) (autoload (quote vm-guess-digest-type) "vm-digest" "Guess the digest type of the message M. M should be the message struct of a real message. Returns either \"rfc934\" or \"rfc1153\"." nil nil) (autoload (quote vm-edit-message) "vm-edit" "Edit the current message. Prefix arg means mark as unedited instead. If editing, the current message is copied into a temporary buffer, and this buffer is selected for editing. The major mode of this buffer is controlled by the variable vm-edit-message-mode. The hooks specified in vm-edit-message-hook are run just prior to returning control to the user for editing. Use C-c ESC when you have finished editing the message. The message will be inserted into its folder replacing the old version of the message. If you don't want your edited version of the message to replace the original, use C-c C-] and the edit will be aborted." t nil) (autoload (quote vm-edit-message-other-frame) "vm-edit" "Like vm-edit-message, but run in a newly created frame." t nil) (autoload (quote vm-discard-cached-data) "vm-edit" "Discard cached information about the current message. When VM gathers information from the headers of a message, it stores it internally for future reference. This command causes VM to forget this information, and VM will be forced to search the headers of the message again for these data. VM will also have to decide again which headers should be displayed and which should not. Therefore this command is useful if you change the value of vm-visible-headers or vm-invisible-header-regexp in the midst of a VM session. Numeric prefix argument N means to discard data from the current message plus the next N-1 messages. A negative N means discard data from the current message and the previous N-1 messages. When invoked on marked messages (via vm-next-command-uses-marks), data is discarded only from the marked messages in the current folder." t nil) (autoload (quote vm-edit-message-end) "vm-edit" "End the edit of a message and copy the result to its folder." t nil) (autoload (quote vm-edit-message-abort) "vm-edit" "Abort the edit of a message, forgetting changes to the message." t nil) (autoload (quote vm-number-messages) "vm-folder" "Set the number-of and padded-number-of slots of messages in vm-message-list. If non-nil, START-POINT should point to a cons cell in vm-message-list and the numbering will begin there, else the numbering will begin at the head of vm-message-list. If START-POINT is non-nil the reverse-link-of slot of the message in the cons must be valid and the message pointed to (if any) must have a non-nil number-of slot, because it is used to determine what the starting message number should be. If non-nil, END-POINT should point to a cons cell in vm-message-list and the numbering will end with the message just before this cell. A nil value means numbering will be done until the end of vm-message-list is reached." nil nil) (autoload (quote vm-set-numbering-redo-start-point) "vm-folder" "Set vm-numbering-redo-start-point to START-POINT if appropriate. Also mark the current buffer as needing a display update. START-POINT should be a cons in vm-message-list or just t. (t means start from the beginning of vm-message-list.) If START-POINT is closer to the head of vm-message-list than vm-numbering-redo-start-point or is equal to t, then vm-numbering-redo-start-point is set to match it." nil nil) (autoload (quote vm-set-numbering-redo-end-point) "vm-folder" "Set vm-numbering-redo-end-point to END-POINT if appropriate. Also mark the current buffer as needing a display update. END-POINT should be a cons in vm-message-list or just t. (t means number all the way to the end of vm-message-list.) If END-POINT is closer to the end of vm-message-list or is equal to t, then vm-numbering-redo-start-point is set to match it. The number-of slot is used to determine proximity to the end of vm-message-list, so this slot must be valid in END-POINT's message and the message in the cons pointed to by vm-numbering-redo-end-point." nil nil) (autoload (quote vm-do-needed-renumbering) "vm-folder" "Number messages in vm-message-list as specified by vm-numbering-redo-start-point and vm-numbering-redo-end-point. vm-numbering-redo-start-point = t means start at the head of vm-message-list. vm-numbering-redo-end-point = t means number all the way to the end of vm-message-list. Otherwise the variables' values should be conses in vm-message-list or nil." nil nil) (autoload (quote vm-set-summary-redo-start-point) "vm-folder" "Set vm-summary-redo-start-point to START-POINT if appropriate. Also mark the current buffer as needing a display update. START-POINT should be a cons in vm-message-list or just t. (t means start from the beginning of vm-message-list.) If START-POINT is closer to the head of vm-message-list than vm-numbering-redo-start-point or is equal to t, then vm-numbering-redo-start-point is set to match it." nil nil) (autoload (quote vm-mark-for-summary-update) "vm-folder" "Mark message M for a summary update. Also mark M's buffer as needing a display update. Any virtual messages of M and their buffers are similarly marked for update. If M is a virtual message and virtual mirroring is in effect for M, i.e. (attribute-of eq attributes-of M's real message, M's real message and its buffer are scheduled for an update. Optional arg DONT-KILL-CACHE non-nil means don't invalidate the summary-of slot for any messages marked for update. This is meant to be used by functions that update message information that is not cached in the summary-of slot, e.g. message numbers and thread indentation." nil nil) (autoload (quote vm-force-mode-line-update) "vm-folder" "Force a mode line update in all frames." nil nil) (autoload (quote vm-do-needed-mode-line-update) "vm-folder" "Do a modeline updates for the current folder buffer. This means setting up all the various vm-ml attribute variables in the folder buffer and copying necessary variables to the folder buffer's summary buffer, and then forcing Emacs to update all modelines. Also if a virtual folder being updated has no messages, erase-buffer is called on its buffer." nil nil) (autoload (quote vm-update-summary-and-mode-line) "vm-folder" "Update summary and mode line for all VM folder and summary buffers. Message lists are renumbered. Summary entries are updated or wiped and regenerated. Mode lines are updated." nil nil) (autoload (quote vm-reverse-link-messages) "vm-folder" "Set reverse links for all messages in vm-message-list." nil nil) (autoload (quote vm-match-ordered-header) "vm-folder" "Try to match a header in ALIST and return the matching cell. This is used by header ordering code. ALIST looks like this ((\"From\") (\"To\")). This function returns the alist element whose car matches the header starting at point. The header ordering code uses the cdr of the element returned to hold headers to be output later." nil nil) (autoload (quote vm-match-header) "vm-folder" "Match a header and save some state information about the matched header. Optional first arg HEADER-NAME means match the header only if it matches HEADER-NAME. HEADER-NAME should be a string containing a header name. The string should end with a colon if just that name should be matched. A string that does not end in a colon will match all headers that begin with that string. State information is stored in vm-matched-header-vector bound to a vector of this form. [ header-start header-end header-name-start header-name-end header-contents-start header-contents-end ] Elements are integers. There are functions to access and use this info." nil nil) (autoload (quote vm-matched-header) "vm-folder" "Returns the header last matched by vm-match-header. Trailing newline is included." nil nil) (autoload (quote vm-matched-header-name) "vm-folder" "Returns the name of the header last matched by vm-match-header." nil nil) (autoload (quote vm-matched-header-contents) "vm-folder" "Returns the contents of the header last matched by vm-match-header. Trailing newline is not included." nil nil) (autoload (quote vm-matched-header-start) "vm-folder" "Returns the start position of the header last matched by vm-match-header." nil nil) (autoload (quote vm-matched-header-end) "vm-folder" "Returns the end position of the header last matched by vm-match-header." nil nil) (autoload (quote vm-matched-header-name-start) "vm-folder" "Returns the start position of the name of the header last matched by vm-match-header." nil nil) (autoload (quote vm-matched-header-name-end) "vm-folder" "Returns the end position of the name of the header last matched by vm-match-header." nil nil) (autoload (quote vm-matched-header-contents-start) "vm-folder" "Returns the start position of the contents of the header last matched by vm-match-header." nil nil) (autoload (quote vm-matched-header-contents-end) "vm-folder" "Returns the end position of the contents of the header last matched by vm-match-header." nil nil) (autoload (quote vm-get-folder-type) "vm-folder" "Return a symbol indicating the folder type of the current buffer. If optional arg FILE is present the type of FILE is returned instead. Returns nil if folder has no type (empty) unknown if the type is not known to VM mmdf for MMDF folders babyl for BABYL folders From_ for UNIX From_ folders If vm-trust-From_-with-Content-Length is non-nil, From_-with-Content-Length is returned if the first message in the folder has a Content-Length header and the folder otherwise looks like a From_ folder." nil nil) (autoload (quote vm-convert-folder-type) "vm-folder" "Convert buffer from OLD-TYPE to NEW-TYPE. OLD-TYPE and NEW-TYPE should be symbols returned from vm-get-folder-type. This should be called on non-live buffer like crash boxes. This will confuse VM if called on a folder buffer in vm-mode." nil nil) (autoload (quote vm-convert-folder-header) "vm-folder" "Convert the folder header form OLD-TYPE to NEW-TYPE. The folder header is the text at the beginning of a folder that is a legal part of the folder but is not part of the first message. This is for dealing with BABYL files." nil nil) (autoload (quote vm-skip-past-folder-header) "vm-folder" "Move point past the folder header. The folder header is the text at the beginning of a folder that is a legal part of the folder but is not part of the first message. This is for dealing with BABYL files." nil nil) (autoload (quote vm-convert-folder-type-headers) "vm-folder" "Convert headers in the message around point from OLD-TYPE to NEW-TYPE. This means to add/delete Content-Length and any other headers related to folder-type as needed for folder type conversions. This function expects point to be at the beginning of the header section of a message, and it only deals with that message." nil nil) (autoload (quote vm-munge-message-separators) "vm-folder" "Munge message separators of FOLDER-TYPE found between START and END. This function is used to eliminate message separators for a particular folder type that happen to occur in a message. \">\" is prepended to such separators." nil nil) (autoload (quote vm-compatible-folder-p) "vm-folder" "Return non-nil if FILE is a compatible folder with the current buffer. The current folder must have vm-folder-type initialized. FILE is compatible if - it is empty - the current folder is empty - the two folder types are equal" nil nil) (autoload (quote vm-leading-message-separator) "vm-folder" "Returns a leading message separator for the current folder. Defaults to returning a separator for the current folder type. Optional first arg FOLDER-TYPE means return a separator for that folder type instead. Optional second arg MESSAGE should be a message struct. This is used generating BABYL separators, because they contain message attributes and labels that must must be copied from the message. Optional third arg FOR-OTHER-FOLDER non-nil means that this separator will be used a `foreign' folder. This means that the `deleted' attributes should not be copied for BABYL folders." nil nil) (autoload (quote vm-trailing-message-separator) "vm-folder" "Returns a leading message separator for the current folder. Defaults to returning a separator for the current folder type. Optional first arg FOLDER-TYPE means return a separator for that folder type instead." nil nil) (autoload (quote vm-folder-header) "vm-folder" "Returns a folder header for the current folder. Defaults to returning a folder header for the current folder type. Optional first arg FOLDER-TYPE means return a folder header for that folder type instead. Optional second arg LABEL-OBARRAY should be an obarray of labels that have been used in this folder. This is used for BABYL folders." nil nil) (autoload (quote vm-find-leading-message-separator) "vm-folder" "Find the next leading message separator in a folder. Returns non-nil if the separator is found, nil otherwise." nil nil) (autoload (quote vm-find-trailing-message-separator) "vm-folder" "Find the next trailing message separator in a folder." nil nil) (autoload (quote vm-skip-past-leading-message-separator) "vm-folder" "Move point past a leading message separator at point." nil nil) (autoload (quote vm-skip-past-trailing-message-separator) "vm-folder" "Move point past a trailing message separator at point." nil nil) (autoload (quote vm-build-message-list) "vm-folder" "Build a chain of message structures, stored them in vm-message-list. Finds the start and end of each message and fills in the relevant fields in the message structures. Also finds the beginning of the header section and the end of the text section and fills in these fields in the message structures. vm-text-of and vm-vheaders-of field don't get filled until they are needed. If vm-message-list already contained messages, the end of the last known message is found and then the parsing of new messages begins there and the message are appended to vm-message-list. vm-folder-type is initialized here." nil nil) (autoload (quote vm-build-header-order-alist) "vm-folder" nil nil nil) (autoload (quote vm-reorder-message-headers) "vm-folder" nil nil nil) (autoload (quote vm-read-attributes) "vm-folder" nil nil nil) (autoload (quote vm-read-babyl-attributes) "vm-folder" nil nil nil) (autoload (quote vm-set-default-attributes) "vm-folder" nil nil nil) (autoload (quote vm-emit-totals-blurb) "vm-folder" nil nil nil) (autoload (quote vm-convert-v4-attributes) "vm-folder" nil nil nil) (autoload (quote vm-gobble-labels) "vm-folder" nil nil nil) (autoload (quote vm-gobble-bookmark) "vm-folder" nil nil nil) (autoload (quote vm-gobble-visible-header-variables) "vm-folder" nil nil nil) (autoload (quote vm-gobble-message-order) "vm-folder" nil nil nil) (autoload (quote vm-gobble-summary) "vm-folder" nil nil nil) (autoload (quote vm-stuff-attributes) "vm-folder" nil nil nil) (autoload (quote vm-stuff-babyl-attributes) "vm-folder" nil nil nil) (autoload (quote vm-babyl-attributes-string) "vm-folder" nil nil nil) (autoload (quote vm-babyl-labels-string) "vm-folder" nil nil nil) (autoload (quote vm-stuff-virtual-attributes) "vm-folder" nil nil nil) (autoload (quote vm-stuff-labels) "vm-folder" nil nil nil) (autoload (quote vm-stuff-bookmark) "vm-folder" nil nil nil) (autoload (quote vm-stuff-summary) "vm-folder" nil nil nil) (autoload (quote vm-stuff-header-variables) "vm-folder" nil nil nil) (autoload (quote vm-stuff-message-order) "vm-folder" nil nil nil) (autoload (quote vm-remove-message-order) "vm-folder" nil nil nil) (autoload (quote vm-change-all-new-to-unread) "vm-folder" nil nil nil) (autoload (quote vm-unread-message) "vm-folder" "Set the `unread' attribute for the current message. If the message is already new or unread, then it is left unchanged. Numeric prefix argument N means to unread the current message plus the next N-1 messages. A negative N means unread the current message and the previous N-1 messages. When invoked on marked messages (via vm-next-command-uses-marks), all marked messages are affected, other messages are ignored." t nil) (autoload (quote vm-quit-just-bury) "vm-folder" "Bury the current VM folder and summary buffers. The folder is not altered and Emacs is still visiting it. You can switch back to it with switch-to-buffer or by using the Buffer Menu." t nil) (autoload (quote vm-quit-no-change) "vm-folder" "Exit VM without saving changes made to the folder." t nil) (autoload (quote vm-quit) "vm-folder" "Quit VM, saving changes. Deleted messages are not expunged." t nil) (autoload (quote vm-start-itimers-if-needed) "vm-folder" nil nil nil) (autoload (quote vm-get-mail-itimer-function) "vm-folder" nil nil nil) (autoload (quote vm-flush-itimer-function) "vm-folder" nil nil nil) (autoload (quote vm-flush-cached-data) "vm-folder" nil nil nil) (autoload (quote vm-write-file-hook) "vm-folder" nil nil nil) (autoload (quote vm-save-buffer) "vm-folder" nil t nil) (autoload (quote vm-write-file) "vm-folder" nil t nil) (autoload (quote vm-save-folder) "vm-folder" "Save current folder to disk. Deleted messages are not expunged. Prefix arg is handled the same as for the command save-buffer. When applied to a virtual folder, this command runs itself on each of the underlying real folders associated with the virtual folder." t nil) (autoload (quote vm-save-and-expunge-folder) "vm-folder" "Expunge folder, then save it to disk. Prefix arg is handled the same as for the command save-buffer. Expunge won't be done if folder is read-only. When applied to a virtual folder, this command works as if you had run vm-expunge-folder followed by vm-save-folder." t nil) (autoload (quote vm-handle-file-recovery-or-reversion) "vm-folder" nil nil nil) (autoload (quote vm-handle-file-recovery) "vm-folder" nil nil nil) (autoload (quote vm-handle-file-reversion) "vm-folder" nil nil nil) (autoload (quote vm-help) "vm-folder" "Display help for various VM activities." t nil) (autoload (quote vm-spool-move-mail) "vm-folder" nil nil nil) (autoload (quote vm-gobble-crash-box) "vm-folder" nil nil nil) (autoload (quote vm-get-spooled-mail) "vm-folder" nil nil nil) (autoload (quote vm-safe-popdrop-string) "vm-folder" nil nil nil) (autoload (quote vm-get-new-mail) "vm-folder" "Move any new mail that has arrived in any of the spool files for the current folder into the folder. New mail is appended to the disk and buffer copies of the folder. Prefix arg means to gather mail from a user specified folder, instead of the usual spool files. The file name will be read from the minibuffer. Unlike when getting mail from a spool file, the source file is left undisturbed after its messages have been copied. When applied to a virtual folder, this command runs itself on each of the underlying real folders associated with this virtual folder. A prefix argument has no effect; mail is always gathered from the spool files." t nil) (autoload (quote vm-assimilate-new-messages) "vm-folder" nil nil nil) (autoload (quote vm-select-marked-or-prefixed-messages) "vm-folder" nil nil nil) (autoload (quote vm-display-startup-message) "vm-folder" nil nil nil) (autoload (quote vm-load-init-file) "vm-folder" nil t nil) (autoload (quote vm-session-initialization) "vm-folder" nil nil nil) (autoload (quote vm-toggle-read-only) "vm-folder" nil t nil) (autoload (quote vm-mode-internal) "vm-folder" nil nil nil) (autoload (quote vm-link-to-virtual-buffers) "vm-folder" nil nil nil) (autoload (quote vm-change-folder-type) "vm-folder" "Change folder type to TYPE. TYPE may be one of the following symbol values: From_ From_-with-Content-Length mmdf babyl Interactively TYPE will be read from the minibuffer." t nil) (autoload (quote vm-show-copying-restrictions) "vm-license" nil t nil) (autoload (quote vm-show-no-warranty) "vm-license" "Display \"NO WARRANTY\" section of the GNU General Public License." t nil) (autoload (quote vm-mark-status) "vm-mark" nil nil nil) (autoload (quote vm-clear-all-marks) "vm-mark" "Removes all message marks in the current folder." t nil) (autoload (quote vm-mark-all-messages) "vm-mark" "Mark all messages in the current folder." t nil) (autoload (quote vm-mark-message) "vm-mark" "Mark the current message. Numeric prefix argument N means mark the current message and the next N-1 messages. A negative N means mark the current message and the previous N-1 messages." t nil) (autoload (quote vm-unmark-message) "vm-mark" "Remove the mark from the current message. Numeric prefix argument N means unmark the current message and the next N-1 messages. A negative N means unmark the current message and the previous N-1 messages." t nil) (autoload (quote vm-mark-or-unmark-messages-with-selector) "vm-mark" nil nil nil) (autoload (quote vm-mark-matching-messages) "vm-mark" "Mark messages matching some criterion. You can use any of the virtual folder selectors, except for the `and', `or' and `not' selectors. See the documentation for the variable vm-virtual-folder-alist for more information." t nil) (autoload (quote vm-unmark-matching-messages) "vm-mark" "Unmark messages matching some criterion. You can use any of the virtual folder selectors, except for the `and', `or' and `not' selectors. See the documentation for the variable vm-virtual-folder-alist for more information." t nil) (autoload (quote vm-mark-thread-subtree) "vm-mark" "Mark the all messages in the thread tree rooted at the current message." t nil) (autoload (quote vm-unmark-thread-subtree) "vm-mark" "Unmark the all messages in the thread tree rooted at the current message." t nil) (autoload (quote vm-mark-or-unmark-thread-subtree) "vm-mark" nil nil nil) (autoload (quote vm-mark-messages-same-subject) "vm-mark" "Mark all messages with the same subject as the current message." t nil) (autoload (quote vm-unmark-messages-same-subject) "vm-mark" "Unmark all messages with the same subject as the current message." t nil) (autoload (quote vm-mark-messages-same-author) "vm-mark" "Mark all messages with the same author as the current message." t nil) (autoload (quote vm-unmark-messages-same-author) "vm-mark" "Unmark all messages with the same author as the current message." t nil) (autoload (quote vm-mark-or-unmark-messages-same-subject-or-author) "vm-mark" nil nil nil) (autoload (quote vm-next-command-uses-marks) "vm-mark" "Does nothing except insure that the next VM command will operate only on the marked messages in the current folder." t nil) (autoload (quote vm-marked-messages) "vm-mark" nil nil nil) (autoload (quote vm-mark-help) "vm-mark" nil t nil) (autoload (quote vm-location-data-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-start-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-headers-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-vheaders-of) "vm-message" nil nil nil) (autoload (quote vm-text-of) "vm-message" nil nil nil) (autoload (quote vm-text-end-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-end-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-softdata-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-number-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-padded-number-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-mark-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-su-start-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-su-end-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-real-message-sym-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-real-message-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-reverse-link-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-message-type-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-message-id-number-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-buffer-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-thread-indention-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-thread-list-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-babyl-frob-flag-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-saved-virtual-attributes-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-saved-virtual-mirror-data-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-virtual-summary-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-attributes-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-new-flag) "vm-message" nil nil (quote macro)) (autoload (quote vm-unread-flag) "vm-message" nil nil (quote macro)) (autoload (quote vm-deleted-flag) "vm-message" nil nil (quote macro)) (autoload (quote vm-filed-flag) "vm-message" nil nil (quote macro)) (autoload (quote vm-replied-flag) "vm-message" nil nil (quote macro)) (autoload (quote vm-written-flag) "vm-message" nil nil (quote macro)) (autoload (quote vm-forwarded-flag) "vm-message" nil nil (quote macro)) (autoload (quote vm-edited-flag) "vm-message" nil nil (quote macro)) (autoload (quote vm-redistributed-flag) "vm-message" nil nil (quote macro)) (autoload (quote vm-cache-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-byte-count-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-weekday-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-monthday-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-month-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-year-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-hour-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-zone-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-full-name-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-from-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-message-id-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-line-count-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-subject-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-vheaders-regexp-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-to-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-to-names-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-month-number-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-sortable-datestring-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-sortable-subject-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-summary-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-parent-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-mirror-data-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-edit-buffer-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-virtual-messages-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-modflag-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-labels-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-label-string-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-location-data-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-start-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-headers-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-vheaders-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-text-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-text-end-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-end-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-softdata-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-number-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-padded-number-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-mark-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-su-start-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-su-end-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-real-message-sym-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-reverse-link-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-reverse-link-sym-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-message-type-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-message-id-number-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-buffer-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-thread-indention-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-thread-list-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-babyl-frob-flag-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-saved-virtual-attributes-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-saved-virtual-mirror-data-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-virtual-summary-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-attributes-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-edited-flag-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-cache-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-byte-count-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-weekday-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-monthday-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-month-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-year-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-hour-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-zone-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-full-name-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-from-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-message-id-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-line-count-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-subject-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-vheaders-regexp-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-to-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-to-names-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-month-number-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-sortable-datestring-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-sortable-subject-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-summary-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-parent-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-mirror-data-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-edit-buffer-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-virtual-messages-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-virtual-messages-sym-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-modflag-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-labels-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-set-label-string-of) "vm-message" nil nil (quote macro)) (autoload (quote vm-make-message) "vm-message" nil nil nil) (autoload (quote vm-find-and-set-text-of) "vm-message" nil nil nil) (autoload (quote vm-virtual-message-p) "vm-message" nil nil nil) (autoload (quote vm-minibuffer-complete-word) "vm-minibuf" nil t nil) (autoload (quote vm-minibuffer-completion-message) "vm-minibuf" "Briefly display STRING to the right of the current minibuffer input. Optional second arg SECONDS specifies how long to keep the message visible; the default is 2 seconds. A keypress causes the immediate erasure of the STRING, and return of control to the calling program." nil nil) (autoload (quote vm-minibuffer-show-completions) "vm-minibuf" "Display LIST in a multi-column listing in the \" *Completions*\" buffer. LIST should be a list of strings." nil nil) (autoload (quote vm-minibuffer-completion-help) "vm-minibuf" nil t nil) (autoload (quote vm-read-string) "vm-minibuf" nil nil nil) (autoload (quote vm-read-number) "vm-minibuf" nil nil nil) (autoload (quote vm-read-password) "vm-minibuf" "Read and return a password from the minibuffer, prompting with PROMPT. Optional second argument CONFIRM non-nil means that the user will be asked to type the password a second time for confirmation and if there is a mismatch, the process is repeated. Line editing keys are: C-h, DEL rubout C-u, C-x line kill C-q, C-v literal next" nil nil) (autoload (quote vm-delete-non-matching-strings) "vm-misc" "Delete strings matching REGEXP from LIST. Optional third arg non-nil means to destructively alter LIST, instead of working on a copy. The new version of the list, minus the deleted strings, is returned." nil nil) (autoload (quote vm-parse) "vm-misc" nil nil nil) (autoload (quote vm-parse-addresses) "vm-misc" nil nil nil) (autoload (quote vm-write-string) "vm-misc" nil nil nil) (autoload (quote vm-marker) "vm-misc" nil nil (quote macro)) (autoload (quote vm-increment) "vm-misc" nil nil (quote macro)) (autoload (quote vm-decrement) "vm-misc" nil nil (quote macro)) (autoload (quote vm-select-folder-buffer) "vm-misc" nil nil (quote macro)) (autoload (quote vm-check-for-killed-summary) "vm-misc" nil nil nil) (autoload (quote vm-error-if-folder-read-only) "vm-misc" nil nil (quote macro)) (autoload (quote vm-error-if-virtual-folder) "vm-misc" nil nil (quote macro)) (autoload (quote vm-build-threads-if-unbuilt) "vm-misc" nil nil (quote macro)) (autoload (quote vm-abs) "vm-misc" nil nil nil) (autoload (quote vm-save-restriction) "vm-misc" nil nil (quote macro)) (autoload (quote vm-save-buffer-excursion) "vm-misc" nil nil (quote macro)) (autoload (quote vm-last) "vm-misc" nil nil nil) (autoload (quote vm-vector-to-list) "vm-misc" nil nil nil) (autoload (quote vm-extend-vector) "vm-misc" nil nil nil) (autoload (quote vm-obarray-to-string-list) "vm-misc" nil nil nil) (autoload (quote vm-mapcar) "vm-misc" nil nil nil) (autoload (quote vm-mapc) "vm-misc" nil nil nil) (autoload (quote vm-delete) "vm-misc" nil nil nil) (autoload (quote vm-delete-duplicates) "vm-misc" "Delete duplicate equivalent strings from the list. If ALL is t, then if there is more than one occurrence of a string in the list, then all occurrences of it are removed instead of just the subseqent ones. If HACK-ADDRESSES is t, then the strings are considered to be mail addresses, and only the address part is compared (so that \"Name \" and \"foo\" would be considered to be equivalent.)" nil nil) (autoload (quote vm-member-0) "vm-misc" nil nil nil) (autoload (quote vm-delqual) "vm-misc" nil nil nil) (autoload (quote vm-copy-local-variables) "vm-misc" nil nil nil) (autoload (quote vm-error-if-folder-empty) "vm-misc" nil nil nil) (autoload (quote vm-copy) "vm-misc" nil nil nil) (autoload (quote vm-lucid-emacs-p) "vm-misc" nil nil nil) (autoload (quote vm-fsf-emacs-19-p) "vm-misc" nil nil nil) (autoload (quote vm-run-message-hook) "vm-misc" nil nil nil) (autoload (quote vm-error-free-call) "vm-misc" nil nil nil) (autoload (quote vm-trace) "vm-misc" nil nil nil) (autoload (quote vm-timezone-make-date-sortable) "vm-misc" nil nil nil) (autoload (quote vm-current-time-zone) "vm-misc" nil nil nil) (autoload (quote vm-should-generate-summary) "vm-misc" nil nil nil) (autoload (quote vm-find-composition-buffer) "vm-misc" nil nil nil) (autoload (quote vm-get-file-buffer) "vm-misc" "Like get-file-buffer, but also checks buffers against FILE's truename" nil nil) (autoload (quote vm-record-and-change-message-pointer) "vm-motion" nil nil nil) (autoload (quote vm-goto-message) "vm-motion" "Go to the message numbered N. Interactively N is the prefix argument. If no prefix arg is provided N is prompted for in the minibuffer. If vm-follow-summary-cursor is non-nil this command will go to the message under the cursor in the summary buffer if the summary window is selected. This only happens if no prefix argument is given." t nil) (autoload (quote vm-goto-message-last-seen) "vm-motion" "Go to the message last previewed." t nil) (autoload (quote vm-goto-parent-message) "vm-motion" "Go to the parent of the current message." t nil) (autoload (quote vm-goto-message-id) "vm-motion" "Select the message with the given message ID." t nil) (autoload (quote vm-check-count) "vm-motion" nil nil nil) (autoload (quote vm-move-message-pointer) "vm-motion" nil nil nil) (autoload (quote vm-should-skip-message) "vm-motion" nil nil nil) (autoload (quote vm-next-message) "vm-motion" "Go forward one message and preview it. With prefix arg (optional first argument) COUNT, go forward COUNT messages. A negative COUNT means go backward. If the absolute value of COUNT is greater than 1, then the values of the variables vm-skip-deleted-messages and vm-skip-read-messages are ignored. When invoked on marked messages (via vm-next-command-uses-marks) this command 'sees' marked messages as it moves." t nil) (autoload (quote vm-previous-message) "vm-motion" "Go back one message and preview it. With prefix arg COUNT, go backward COUNT messages. A negative COUNT means go forward. If the absolute value of COUNT > 1 the values of the variables vm-skip-deleted-messages and vm-skip-read-messages are ignored." t nil) (autoload (quote vm-next-message-no-skip) "vm-motion" "Like vm-next-message but will not skip deleted or read messages." t nil) (autoload (quote vm-previous-message-no-skip) "vm-motion" "Like vm-previous-message but will not skip deleted or read messages." t nil) (autoload (quote vm-next-unread-message) "vm-motion" "Move forward to the nearest new or unread message, if there is one." t nil) (autoload (quote vm-previous-unread-message) "vm-motion" "Move backward to the nearest new or unread message, if there is one." t nil) (autoload (quote vm-next-message-same-subject) "vm-motion" "Move forward to the nearest message with the same subject. vm-subject-ignored-prefix and vm-subject-ignored-suffix will apply to the subject comparisons." t nil) (autoload (quote vm-previous-message-same-subject) "vm-motion" "Move backward to the nearest message with the same subject. vm-subject-ignored-prefix and vm-subject-ignored-suffix will apply to the subject comparisons." t nil) (autoload (quote vm-find-first-unread-message) "vm-motion" nil nil nil) (autoload (quote vm-thoughtfully-select-message) "vm-motion" nil nil nil) (autoload (quote vm-follow-summary-cursor) "vm-motion" nil nil nil) (autoload (quote vm-scroll-forward) "vm-page" "Scroll forward a screenful of text. If the current message is being previewed, the message body is revealed. If at the end of the current message, moves to the next message iff the value of vm-auto-next-message is non-nil. Prefix N scrolls forward N lines." t nil) (autoload (quote vm-scroll-forward-internal) "vm-page" nil nil nil) (autoload (quote vm-howl-if-eom) "vm-page" nil nil nil) (autoload (quote vm-emit-eom-blurb) "vm-page" nil nil nil) (autoload (quote vm-scroll-backward) "vm-page" "Scroll backward a screenful of text. Prefix N scrolls backward N lines." t nil) (autoload (quote vm-highlight-headers) "vm-page" nil nil nil) (autoload (quote vm-unhighlight-region) "vm-page" nil nil nil) (autoload (quote vm-highlight-region) "vm-page" nil nil nil) (autoload (quote vm-preview-current-message) "vm-page" nil nil nil) (autoload (quote vm-show-current-message) "vm-page" nil nil nil) (autoload (quote vm-expose-hidden-headers) "vm-page" "Toggle exposing and hiding message headers that are normally not visible." t nil) (autoload (quote vm-widen-page) "vm-page" nil nil nil) (autoload (quote vm-narrow-to-page) "vm-page" nil nil nil) (autoload (quote vm-beginning-of-message) "vm-page" "Moves to the beginning of the current message." t nil) (autoload (quote vm-end-of-message) "vm-page" "Moves to the end of the current message, exposing and flagging it read as necessary." t nil) (autoload (quote vm-pop-move-mail) "vm-pop" nil nil nil) (autoload (quote vm-pop-process-filter) "vm-pop" nil nil nil) (autoload (quote vm-pop-send-command) "vm-pop" nil nil nil) (autoload (quote vm-pop-read-response) "vm-pop" nil nil nil) (autoload (quote vm-pop-read-stat-response) "vm-pop" nil nil nil) (autoload (quote vm-pop-retrieve-to-crashbox) "vm-pop" nil nil nil) (autoload (quote vm-pop-cleanup-region) "vm-pop" nil nil nil) (autoload (quote vm-pop-md5) "vm-pop" nil nil nil) (autoload (quote vm-do-reply) "vm-reply" nil nil nil) (autoload (quote vm-strip-ignored-addresses) "vm-reply" nil nil nil) (autoload (quote vm-ignored-reply-to) "vm-reply" nil nil nil) (autoload (quote vm-mail-yank-default) "vm-reply" nil nil nil) (autoload (quote vm-yank-message-other-folder) "vm-reply" "Like vm-yank-message except the message is yanked from a folder other than the one that spawned the current Mail mode buffer. The name of the folder is read from the minibuffer. Don't call this function from a program." t nil) (autoload (quote vm-yank-message) "vm-reply" "Yank message number N into the current buffer at point. When called interactively N is always read from the minibuffer. When called non-interactively the first argument is expected to be a message struct. This command is meant to be used in VM created Mail mode buffers; the yanked message comes from the mail buffer containing the message you are replying to, forwarding, or invoked VM's mail command from. All message headers are yanked along with the text. Point is left before the inserted text, the mark after. Any hook functions bound to mail-citation-hook are run, after inserting the text and setting point and mark. For backward compatibility, if mail-citation-hook is set to nil, `mail-yank-hooks' is run instead. If mail-citation-hook and mail-yank-hooks are both nil, this default action is taken: the yanked headers are trimmed as specified by vm-included-text-headers and vm-included-text-discard-header-regexp, and the value of vm-included-text-prefix is prepended to every yanked line." t nil) (autoload (quote vm-mail-send-and-exit) "vm-reply" "Just like mail-send-and-exit except that VM flags the appropriate message(s) as having been replied to, if appropriate." t nil) (autoload (quote vm-keep-mail-buffer) "vm-reply" nil nil nil) (autoload (quote vm-help-tale) "vm-reply" nil nil nil) (autoload (quote vm-mail-send) "vm-reply" "Just like mail-send except that VM flags the appropriate message(s) as replied to, forwarded, etc, if appropriate." t nil) (autoload (quote vm-rename-current-mail-buffer) "vm-reply" nil nil nil) (autoload (quote vm-mail-mark-replied) "vm-reply" nil nil nil) (autoload (quote vm-mail-mark-forwarded) "vm-reply" nil nil nil) (autoload (quote vm-mail-mark-redistributed) "vm-reply" nil nil nil) (autoload (quote vm-reply) "vm-reply" "Reply to the sender of the current message. Numeric prefix argument N means to reply to the current message plus the next N-1 messages. A negative N means reply to the current message and the previous N-1 messages. If invoked on marked messages (via vm-next-command-uses-marks), all marked messages will be replied to. You will be placed into a standard Emacs Mail mode buffer to compose and send your message. See the documentation for the function `mail' for more info. Note that the normal binding of C-c C-y in the reply buffer is automatically changed to vm-yank-message during a reply. This allows you to yank any message from the current folder into a reply. Normal VM commands may be accessed in the reply buffer by prefixing them with C-c C-v." t nil) (autoload (quote vm-reply-include-text) "vm-reply" "Reply to the sender (only) of the current message and include text from the message. See the documentation for function vm-reply for details." t nil) (autoload (quote vm-followup) "vm-reply" "Reply to all recipients of the current message. See the documentation for the function vm-reply for details." t nil) (autoload (quote vm-followup-include-text) "vm-reply" "Reply to all recipients of the current message and include text from the message. See the documentation for the function vm-reply for details." t nil) (autoload (quote vm-forward-message-all-headers) "vm-reply" "Like vm-forward-message but always forwards all the headers." t nil) (autoload (quote vm-forward-message) "vm-reply" "Forward the current message to one or more recipients. You will be placed in a Mail mode buffer as you would with a reply, but you must fill in the To: header and perhaps the Subject: header manually." t nil) (autoload (quote vm-resend-bounced-message) "vm-reply" "Extract the original text from a bounced message and resend it. You will be placed in a Mail mode buffer with the extracted message and you can change the recipient address before resending the message." t nil) (autoload (quote vm-resend-message) "vm-reply" "Resend the current message to someone else. The current message will be copied to a Mail mode buffer and you can edit the message and send it as usual. NOTE: since you are doing a resend, a Resent-To header is provided for you to fill in. If you don't fill it in, when you send the message it will go to the original recipients listed in the To and Cc headers. You may also create a Resent-Cc header." t nil) (autoload (quote vm-send-digest) "vm-reply" "Send a digest of all messages in the current folder to recipients. The type of the digest is specified by the variable vm-digest-send-type. You will be placed in a Mail mode buffer as is usual with replies, but you must fill in the To: and Subject: headers manually. Prefix arg means to insert a list of preamble lines at the beginning of the digest. One line is generated for each message being digestified. The variable vm-digest-preamble-format determines the format of the preamble lines. If invoked on marked messages (via vm-next-command-uses-marks), only marked messages will be put into the digest." t nil) (autoload (quote vm-send-rfc934-digest) "vm-reply" "Like vm-send-digest but always sends an RFC 934 digest." t nil) (autoload (quote vm-send-rfc1153-digest) "vm-reply" "Like vm-send-digest but always sends an RFC 1153 digest." t nil) (autoload (quote vm-continue-composing-message) "vm-reply" "Find and select the most recently used mail composition buffer. If the selected buffer is already a Mail mode buffer then it is buried before beginning the search. Non Mail mode buffers and unmodified Mail buffers are skipped. Prefix arg means unmodified Mail mode buffers are not skipped. If no suitable buffer is found, the current buffer remains selected." t nil) (autoload (quote vm-mail-internal) "vm-reply" nil nil nil) (autoload (quote vm-reply-other-frame) "vm-reply" "Like vm-reply, but run in a newly created frame." t nil) (autoload (quote vm-reply-include-text-other-frame) "vm-reply" "Like vm-reply-include-text, but run in a newly created frame." t nil) (autoload (quote vm-followup-other-frame) "vm-reply" "Like vm-followup, but run in a newly created frame." t nil) (autoload (quote vm-followup-include-text-other-frame) "vm-reply" "Like vm-followup-include-text, but run in a newly created frame." t nil) (autoload (quote vm-forward-message-all-headers-other-frame) "vm-reply" "Like vm-forward-message-all-headers, but run in a newly created frame." t nil) (autoload (quote vm-forward-message-other-frame) "vm-reply" "Like vm-forward-message, but run in a newly created frame." t nil) (autoload (quote vm-resend-message-other-frame) "vm-reply" "Like vm-resend-message, but run in a newly created frame." t nil) (autoload (quote vm-resend-bounced-message-other-frame) "vm-reply" "Like vm-resend-bounced-message, but run in a newly created frame." t nil) (autoload (quote vm-send-digest-other-frame) "vm-reply" "Like vm-send-digest, but run in a newly created frame." t nil) (autoload (quote vm-send-rfc934-digest-other-frame) "vm-reply" "Like vm-send-rfc934-digest, but run in a newly created frame." t nil) (autoload (quote vm-send-rfc1153-digest-other-frame) "vm-reply" "Like vm-send-rfc1153-digest, but run in a newly created frame." t nil) (autoload (quote vm-match-data) "vm-save" nil nil nil) (autoload (quote vm-auto-select-folder) "vm-save" nil nil nil) (autoload (quote vm-auto-archive-messages) "vm-save" "Save all unfiled messages that auto-match a folder via vm-auto-folder-alist to their appropriate folders. Deleted message are not saved. Prefix arg means to ask user for confirmation before saving each message. When invoked on marked messages (via vm-next-command-uses-marks), only marked messages are checked against vm-auto-folder-alist. The saved messages are flagged as `filed'." t nil) (autoload (quote vm-save-message) "vm-save" "Save the current message to a mail folder. If the folder already exists, the message will be appended to it. Prefix arg COUNT means save this message and the next COUNT-1 messages. A negative COUNT means save this message and the previous COUNT-1 messages. When invoked on marked messages (via vm-next-command-uses-marks), all marked messages in the current folder are saved; other messages are ignored. The saved messages are flagged as `filed'." t nil) (autoload (quote vm-save-message-sans-headers) "vm-save" "Save the current message to a file, without its header section. If the file already exists, the message will be appended to it. Prefix arg COUNT means save the next COUNT messages. A negative COUNT means save the previous COUNT. When invoked on marked messages (via vm-next-command-uses-marks), all marked messages in the current folder are saved; other messages are ignored. The saved messages are flagged as `written'. This command should NOT be used to save message to mail folders; use vm-save-message instead (normally bound to `s')." t nil) (autoload (quote vm-pipe-message-to-command) "vm-save" "Run shell command with the some or all of the current message as input. By default the entire message is used. With one \\[universal-argument] the text portion of the message is used. With two \\[universal-argument]'s the header portion of the message is used. When invoked on marked messages (via vm-next-command-uses-marks), each marked message is successively piped to the shell command, one message per command invocation. Output, if any, is displayed. The message is not altered." t nil) (autoload (quote vm-isearch-forward) "vm-search" "Incrementally search forward through the current folder's messages. Usage is identical to the standard Emacs incremental search. When the search terminates the message containing point will be selected. If the variable vm-search-using-regexps is non-nil, regular expressions are understood; nil means the search will be for the input string taken literally." t nil) (autoload (quote vm-isearch-backward) "vm-search" "Incrementally search backward through the current folder's messages. Usage is identical to the standard Emacs incremental search. When the search terminates the message containing point will be selected. If the variable vm-search-using-regexps is non-nil, regular expressions are understood; nil means the search will be for the input string taken literally." t nil) (autoload (quote vm-isearch) "vm-search" nil nil nil) (autoload (quote vm-isearch-widen) "vm-search" nil nil nil) (autoload (quote vm-isearch-narrow) "vm-search" nil nil nil) (autoload (quote vm-isearch-update) "vm-search" nil nil nil) (autoload (quote vm-move-message-forward) "vm-sort" "Move a message forward in a VM folder. Prefix arg COUNT causes the current message to be moved COUNT messages forward. A negative COUNT causes movement to be backward instead of forward. COUNT defaults to 1. The current message remains selected after being moved. If vm-move-messages-physically is non-nil, the physical copy of the message in the folder is moved. A nil value means just change the presentation order and leave the physical order of the folder undisturbed." t nil) (autoload (quote vm-move-message-backward) "vm-sort" "Move a message backward in a VM folder. Prefix arg COUNT causes the current message to be moved COUNT messages backward. A negative COUNT causes movement to be forward instead of backward. COUNT defaults to 1. The current message remains selected after being moved. If vm-move-messages-physically is non-nil, the physical copy of the message in the folder is moved. A nil value means just change the presentation order and leave the physical order of the folder undisturbed." t nil) (autoload (quote vm-move-message-forward-physically) "vm-sort" "Like vm-move-message-forward but always move the message physically." t nil) (autoload (quote vm-move-message-backward-physically) "vm-sort" "Like vm-move-message-backward but always move the message physically." t nil) (autoload (quote vm-physically-move-message) "vm-sort" nil nil nil) (autoload (quote vm-so-sortable-datestring) "vm-sort" nil nil nil) (autoload (quote vm-so-sortable-subject) "vm-sort" nil nil nil) (autoload (quote vm-sort-messages) "vm-sort" "Sort message in a folder by the specified KEYS. You may sort by more than one particular message key. If messages compare equal by the first key, the second key will be compared and so on. When called interactively the keys will be read from the minibuffer. Valid keys are \"date\" \"reversed-date\" \"author\" \"reversed-author\" \"subject\" \"reversed-subject\" \"recipients\" \"reversed-recipients\" \"line-count\" \"reversed-line-count\" \"byte-count\" \"reversed-byte-count\" \"physical-order\" \"reversed-physical-order\" Optional second arg (prefix arg interactively) means the sort should change the physical order of the messages in the folder. Normally VM changes presentation order only, leaving the folder in the order in which the messages arrived." t nil) (autoload (quote vm-sort-compare-xxxxxx) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-thread) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-author) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-author-r) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-date) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-date-r) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-recipients) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-recipients-r) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-subject) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-subject-r) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-line-count) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-line-count-r) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-byte-count) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-byte-count-r) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-physical-order) "vm-sort" nil nil nil) (autoload (quote vm-sort-compare-physical-order-r) "vm-sort" nil nil nil) (autoload (quote vm) "vm-startup" "Read mail under Emacs. Optional first arg FOLDER specifies the folder to visit. It defaults to the value of vm-primary-inbox. The folder buffer is put into VM mode, a major mode for reading mail. Prefix arg or optional second arg READ-ONLY non-nil indicates that the folder should be considered read only. No attribute changes, messages additions or deletions will be allowed in the visited folder. Visiting the primary inbox causes any contents of the system mailbox to be moved and appended to the resulting buffer. All the messages can be read by repeatedly pressing SPC. Use `n'ext and `p'revious to move about in the folder. Messages are marked for deletion with `d', and saved to another folder with `s'. Quitting VM with `q' expunges deleted messages and saves the buffered folder to disk. See the documentation for vm-mode for more information." t nil) (autoload (quote vm-other-frame) "vm-startup" "Like vm, but run in a newly created frame." t nil) (autoload (quote vm-other-window) "vm-startup" "Like vm, but run in a different window." t nil) (autoload (quote vm-mode) "vm-startup" "Major mode for reading mail. Commands: h - summarize folder contents C-t - toggle threads display n - go to next message p - go to previous message N - like `n' but ignores skip-variable settings P - like `p' but ignores skip-variable settings M-n - go to next unread message M-p - go to previous unread message RET - go to numbered message (uses prefix arg or prompts in minibuffer) TAB - go to last message seen ^ - go to parent of this message M-s - incremental search through the folder t - display hidden headers SPC - expose message body or scroll forward a page b - scroll backward a page < - go to beginning of current message > - go to end of current message d - delete message, prefix arg deletes messages forward C-d - delete message, prefix arg deletes messages backward u - undelete k - flag for deletion all messages with same subject as the current message r - reply (only to the sender of the message) R - reply with included text from the current message M-r - extract and resend bounced message f - followup (reply to all recipients of message) F - followup with included text from the current message z - forward the current message m - send a message B - resend the current message to another user. c - continue composing the most recent message you were composing @ - digestify and mail entire folder contents (the folder is not modified) * - burst a digest into individual messages, and append and assimilate these message into the current folder. G - sort messages by various keys g - get any new mail that has arrived in the system mailbox (new mail is appended to the disk and buffer copies of the primary inbox.) v - visit another mail folder e - edit the current message j - discard cached information about the current message s - save current message in a folder (appends if folder already exists) w - write current message to a file without its headers (appends if exists) S - save entire folder to disk, does not expunge A - save unfiled messages to their vm-auto-folder-alist specified folders # - expunge deleted messages (without saving folder) q - quit VM, deleted messages are not expunged, folder is saved to disk if it is modified. new messages are changed to be flagged as just unread. x - exit VM with no change to the folder M N - use marks; the next vm command will affect only marked messages if it makes sense for the command to do so M M - mark the current message M U - unmark the current message M m - mark all messages M u - unmark all messages M ? - help for the mark commands M C - mark messages matches by a virtual folder selector M c - unmark messages matches by a virtual folder selector M T - mark thread tree rooted at the current message M t - unmark thread tree rooted at the current message M S - mark messages with the same subject as the current message M s - unmark messages with the same subject as the current message M ? - partial help for mark commands W S - save the current window configuration to a name W D - delete a window configuration W W - apply a configuration W ? - help for the window configuration commands V V - visit a virtual folder (must be defined in vm-virtual-folder-alist) V C - create a virtual folder composed of a subset of the current folder's messages. V A - apply the selectors of a named virtual folder to the messages in the current folder and create a virtual folder containing the selected messages. V M - toggle whether this virtual folder's messages mirror the underlying real messages' attributes. V ? - help for virtual folder commands C-_ - undo, special undo that retracts the most recent changes in message attributes and labels. Expunges message edits, and saves cannot be undone. C-x u is also bound to this command. a - set message attributes l a - add labels to message l d - delete labels from message L - reload your VM init file, ~/.vm % - change a folder to another type ? - help ! - run a shell command | - run a shell command with the current message as input M-C - view conditions under which you may redistribute VM M-W - view the details of VM's lack of a warranty Use M-x vm-submit-bug-report to submit a bug report. Variables: vm-arrived-message-hook vm-auto-center-summary vm-auto-folder-alist vm-auto-folder-case-fold-search vm-auto-get-new-mail vm-auto-next-message vm-berkeley-mail-compatibility vm-check-folder-types vm-convert-folder-types vm-circular-folders vm-confirm-new-folders vm-confirm-quit vm-crash-box vm-default-folder-type vm-delete-after-archiving vm-delete-after-bursting vm-delete-after-saving vm-delete-empty-folders vm-digest-burst-type vm-digest-center-preamble vm-digest-preamble-format vm-digest-send-type vm-display-buffer-hook vm-edit-message-hook vm-folder-directory vm-folder-read-only vm-follow-summary-cursor vm-forward-message-hook vm-forwarded-headers vm-forwarding-digest-type vm-forwarding-subject-format vm-highlighted-header-face vm-highlighted-header-regexp vm-honor-page-delimiters vm-in-reply-to-format vm-included-text-attribution-format vm-included-text-discard-header-regexp vm-included-text-headers vm-included-text-prefix vm-inhibit-startup-message vm-invisible-header-regexp vm-jump-to-new-messages vm-jump-to-unread-messages vm-keep-sent-messages vm-keep-crash-boxes vm-mail-header-from vm-mail-mode-hook vm-mode-hook vm-move-after-deleting vm-move-after-undeleting vm-move-messages-physically vm-mutable-windows vm-mutable-frames vm-preview-lines vm-preview-read-messages vm-primary-inbox vm-quit-hook vm-recognize-pop-maildrops vm-reply-hook vm-reply-ignored-reply-tos vm-reply-ignored-addresses vm-reply-subject-prefix vm-resend-bounced-discard-header-regexp vm-resend-bounced-headers vm-resend-bounced-message-hook vm-resend-discard-header-regexp vm-resend-headers vm-resend-message-hook vm-retrieved-spooled-mail-hook vm-rfc1153-digest-discard-header-regexp vm-rfc1153-digest-headers vm-rfc934-digest-discard-header-regexp vm-rfc934-digest-headers vm-search-using-regexps vm-select-message-hook vm-select-new-message-hook vm-select-unread-message-hook vm-send-digest-hook vm-skip-deleted-messages vm-skip-read-messages vm-spool-files vm-startup-with-summary vm-strip-reply-headers vm-summary-arrow vm-summary-format vm-summary-highlight-face vm-summary-mode-hook vm-summary-redo-hook vm-summary-show-threads vm-summary-subject-no-newlines vm-summary-thread-indent-level vm-trust-From_-with-Content-Length vm-undisplay-buffer-hook vm-unforwarded-header-regexp vm-virtual-folder-alist vm-virtual-mirror vm-visible-headers vm-visit-folder-hook vm-visit-when-saving vm-window-configuration-file " t nil) (autoload (quote vm-visit-folder) "vm-startup" "Visit a mail file. VM will parse and present its messages to you in the usual way. First arg FOLDER specifies the mail file to visit. When this command is called interactively the file name is read from the minibuffer. Prefix arg or optional second arg READ-ONLY non-nil indicates that the folder should be considered read only. No attribute changes, messages additions or deletions will be allowed in the visited folder." t nil) (autoload (quote vm-visit-folder-other-frame) "vm-startup" "Like vm-visit-folder, but run in a newly created frame." t nil) (autoload (quote vm-visit-folder-other-window) "vm-startup" "Like vm-visit-folder, but run in a different window." t nil) (autoload (quote vm-virtual-mode) "vm-startup" "Mode for reading multiple mail folders as one folder. The commands available are the same commands that are found in vm-mode, except that a few of them are not applicable to virtual folders. vm-virtual-mode is not a normal major mode. If you run it, it will not do anything. The entry point to vm-virtual-mode is vm-visit-virtual-folder." nil nil) (autoload (quote vm-visit-virtual-folder) "vm-startup" nil t nil) (autoload (quote vm-visit-virtual-folder-other-frame) "vm-startup" "Like vm-visit-virtual-folder, but run in a newly created frame." t nil) (autoload (quote vm-visit-virtual-folder-other-window) "vm-startup" "Like vm-visit-virtual-folder, but run in a different window." t nil) (autoload (quote vm-mail) "vm-startup" "Send a mail message from within VM, or from without." t nil) (autoload (quote vm-mail-other-frame) "vm-startup" "Like vm-mail, but run in a newly created frame." t nil) (autoload (quote vm-mail-other-window) "vm-startup" "Like vm-mail, but run in a different window." t nil) (autoload (quote vm-submit-bug-report) "vm-startup" "Submit a bug report, with pertinent information to the VM bug list." t nil) (autoload (quote vm-load-init-file) "vm-startup" nil t nil) (autoload (quote vm-session-initialization) "vm-startup" nil nil nil) (autoload (quote vm-summary-mode) "vm-summary" "Major mode for VM folder summaries. This major mode uses the same keymap as vm-mode. See the vm-mode documentation for a list of available commands." nil nil) (autoload (quote vm-summarize) "vm-summary" "Summarize the contents of the folder in a summary buffer. The format is as described by the variable vm-summary-format. Generally one line per message is most pleasing to the eye but this is not mandatory." t nil) (autoload (quote vm-summarize-other-frame) "vm-summary" "Like vm-summarize, but run in a newly created frame." t nil) (autoload (quote vm-do-summary) "vm-summary" nil nil nil) (autoload (quote vm-do-needed-summary-rebuild) "vm-summary" nil nil nil) (autoload (quote vm-update-message-summary) "vm-summary" nil nil nil) (autoload (quote vm-set-summary-pointer) "vm-summary" nil nil nil) (autoload (quote vm-summary-highlight-region) "vm-summary" nil nil nil) (autoload (quote vm-summary-delete-overlay) "vm-summary" nil nil nil) (autoload (quote vm-auto-center-summary) "vm-summary" nil nil nil) (autoload (quote vm-sprintf) "vm-summary" nil nil nil) (autoload (quote vm-tokenized-summary-insert) "vm-summary" nil nil nil) (autoload (quote vm-compile-format) "vm-summary" nil nil nil) (autoload (quote vm-get-header-contents) "vm-summary" nil nil nil) (autoload (quote vm-left-justify-string) "vm-summary" nil nil nil) (autoload (quote vm-right-justify-string) "vm-summary" nil nil nil) (autoload (quote vm-truncate-string) "vm-summary" nil nil nil) (autoload (quote vm-su-attribute-indicators) "vm-summary" nil nil nil) (autoload (quote vm-su-attribute-indicators-long) "vm-summary" nil nil nil) (autoload (quote vm-su-byte-count) "vm-summary" nil nil nil) (autoload (quote vm-su-weekday) "vm-summary" nil nil nil) (autoload (quote vm-su-monthday) "vm-summary" nil nil nil) (autoload (quote vm-su-month) "vm-summary" nil nil nil) (autoload (quote vm-su-month-number) "vm-summary" nil nil nil) (autoload (quote vm-su-year) "vm-summary" nil nil nil) (autoload (quote vm-su-hour-short) "vm-summary" nil nil nil) (autoload (quote vm-su-hour) "vm-summary" nil nil nil) (autoload (quote vm-su-zone) "vm-summary" nil nil nil) (autoload (quote vm-su-mark) "vm-summary" nil nil nil) (autoload (quote vm-grok-From_-date) "vm-summary" nil nil nil) (autoload (quote vm-parse-date) "vm-summary" nil nil nil) (autoload (quote vm-su-do-date) "vm-summary" nil nil nil) (autoload (quote vm-su-do-month) "vm-summary" nil nil nil) (autoload (quote vm-run-user-summary-function) "vm-summary" nil nil nil) (autoload (quote vm-su-full-name) "vm-summary" nil nil nil) (autoload (quote vm-su-interesting-full-name) "vm-summary" nil nil nil) (autoload (quote vm-su-from) "vm-summary" nil nil nil) (autoload (quote vm-su-interesting-from) "vm-summary" nil nil nil) (autoload (quote vm-grok-From_-author) "vm-summary" nil nil nil) (autoload (quote vm-su-do-author) "vm-summary" nil nil nil) (autoload (quote vm-default-chop-full-name) "vm-summary" nil nil nil) (autoload (quote vm-choose-chop-full-name-function) "vm-summary" nil nil nil) (autoload (quote vm-su-do-recipients) "vm-summary" nil nil nil) (autoload (quote vm-su-to) "vm-summary" nil nil nil) (autoload (quote vm-su-to-names) "vm-summary" nil nil nil) (autoload (quote vm-su-message-id) "vm-summary" nil nil nil) (autoload (quote vm-su-line-count) "vm-summary" nil nil nil) (autoload (quote vm-su-subject) "vm-summary" nil nil nil) (autoload (quote vm-su-summary) "vm-summary" nil nil nil) (autoload (quote vm-fix-my-summary!!!) "vm-summary" nil t nil) (autoload (quote vm-su-thread-indent) "vm-summary" nil nil nil) (autoload (quote vm-su-labels) "vm-summary" nil nil nil) (autoload (quote vm-toggle-threads-display) "vm-thread" "Toggle the threads display on and off. When the threads display is on, the folder will be sorted by thread and thread indention (via the %I summary format specifier) will be visible." t nil) (autoload (quote vm-build-threads) "vm-thread" nil nil nil) (autoload (quote vm-thread-mark-for-summary-update) "vm-thread" nil nil nil) (autoload (quote vm-thread-list) "vm-thread" nil nil nil) (autoload (quote vm-unthread-message) "vm-thread" nil nil nil) (autoload (quote vm-th-parent) "vm-thread" nil nil nil) (autoload (quote vm-th-thread-indention) "vm-thread" nil nil nil) (autoload (quote vm-th-thread-list) "vm-thread" nil nil nil) (autoload (quote vm-set-buffer-modified-p) "vm-undo" nil nil nil) (autoload (quote vm-undo-boundary) "vm-undo" nil nil nil) (autoload (quote vm-clear-expunge-invalidated-undos) "vm-undo" nil nil nil) (autoload (quote vm-clear-virtual-quit-invalidated-undos) "vm-undo" nil nil nil) (autoload (quote vm-clear-modification-flag-undos) "vm-undo" nil nil nil) (autoload (quote vm-squeeze-consecutive-undo-boundaries) "vm-undo" nil nil nil) (autoload (quote vm-undo-record) "vm-undo" nil nil nil) (autoload (quote vm-undo-describe) "vm-undo" nil nil nil) (autoload (quote vm-undo-set-message-pointer) "vm-undo" nil nil nil) (autoload (quote vm-undo) "vm-undo" "Undo last change to message attributes in the current folder. Consecutive invocations of this command cause sequentially earlier changes to be undone. After an intervening command between undos, the undos themselves become undoable." t nil) (autoload (quote vm-set-message-attributes) "vm-undo" "Set message attributes. Use this command to change attributes like `deleted' or `replied'. Interactively you will be prompted for the attributes to be changed, and only the attributes you enter will be altered. You can use completion to expand the attribute names. The names should be entered as a space separated list. A numeric prefix argument COUNT causes the current message and the next COUNT-1 message to have their attributes altered. A negative COUNT arg causes the current message and the previous COUNT-1 messages to be altered. COUNT defaults to one." t nil) (autoload (quote vm-add-message-labels) "vm-undo" "Attach some labels to a message. These are arbitrary user-defined labels, not to be confused with message attributes like `new' and `deleted'. Interactively you will be prompted for the labels to be added. You can use completion to expand the label names, with the completion list being all the labels that have ever been used in this folder. The names should be entered as a space separated list. Label names are compared case-insensitively. A numeric prefix argument COUNT causes the current message and the next COUNT-1 message to have the labels added. A negative COUNT arg causes the current message and the previous COUNT-1 messages to be altered. COUNT defaults to one." t nil) (autoload (quote vm-delete-message-labels) "vm-undo" "Delete some labels from a message. These are arbitrary user-defined labels, not to be confused with message attributes like `new' and `deleted'. Interactively you will be prompted for the labels to be deleted. You can use completion to expand the label names, with the completion list being all the labels that have ever been used in this folder. The names should be entered as a space separated list. Label names are compared case-insensitively. A numeric prefix argument COUNT causes the current message and the next COUNT-1 message to have the labels deleted. A negative COUNT arg causes the current message and the previous COUNT-1 messages to be altered. COUNT defaults to one." t nil) (autoload (quote vm-add-or-delete-message-labels) "vm-undo" nil nil nil) (autoload (quote vm-set-xxxx-flag) "vm-undo" nil nil nil) (autoload (quote vm-set-labels) "vm-undo" nil nil nil) (autoload (quote vm-set-new-flag) "vm-undo" nil nil nil) (autoload (quote vm-set-unread-flag) "vm-undo" nil nil nil) (autoload (quote vm-set-deleted-flag) "vm-undo" nil nil nil) (autoload (quote vm-set-filed-flag) "vm-undo" nil nil nil) (autoload (quote vm-set-replied-flag) "vm-undo" nil nil nil) (autoload (quote vm-set-written-flag) "vm-undo" nil nil nil) (autoload (quote vm-set-forwarded-flag) "vm-undo" nil nil nil) (autoload (quote vm-set-redistributed-flag) "vm-undo" nil nil nil) (autoload (quote vm-set-new-flag-of) "vm-undo" nil nil nil) (autoload (quote vm-set-unread-flag-of) "vm-undo" nil nil nil) (autoload (quote vm-set-deleted-flag-of) "vm-undo" nil nil nil) (autoload (quote vm-set-filed-flag-of) "vm-undo" nil nil nil) (autoload (quote vm-set-replied-flag-of) "vm-undo" nil nil nil) (autoload (quote vm-set-written-flag-of) "vm-undo" nil nil nil) (autoload (quote vm-set-forwarded-flag-of) "vm-undo" nil nil nil) (autoload (quote vm-set-redistributed-flag-of) "vm-undo" nil nil nil) (autoload (quote vm-set-deleted-flag-in-vector) "vm-undo" nil nil nil) (autoload (quote vm-set-new-flag-in-vector) "vm-undo" nil nil nil) (autoload (quote vm-spool-files) "vm-vars" nil nil nil) (autoload (quote vm-version) "vm-version" "Returns the value of the variable vm-version." nil nil) (autoload (quote vm-build-virtual-message-list) "vm-virtual" nil nil nil) (autoload (quote vm-create-virtual-folder) "vm-virtual" "Create a new virtual folder from messages in the current folder. The messages will be chosen by applying the selector you specify, which is normally read from the minibuffer. Prefix arg means the new virtual folder should be visited read only." t nil) (autoload (quote vm-apply-virtual-folder) "vm-virtual" "Apply the selectors of a named virtual folder to the current folder and create a virtual folder containing the selected messages. Prefix arg means the new virtual folder should be visited read only." t nil) (autoload (quote vm-toggle-virtual-mirror) "vm-virtual" nil t nil) (autoload (quote vm-virtual-help) "vm-virtual" nil t nil) (autoload (quote vm-delete-directories) "vm-virtual" nil nil nil) (autoload (quote vm-vs-or) "vm-virtual" nil nil nil) (autoload (quote vm-vs-and) "vm-virtual" nil nil nil) (autoload (quote vm-vs-not) "vm-virtual" nil nil nil) (autoload (quote vm-vs-any) "vm-virtual" nil nil nil) (autoload (quote vm-vs-author) "vm-virtual" nil nil nil) (autoload (quote vm-vs-recipient) "vm-virtual" nil nil nil) (autoload (quote vm-vs-subject) "vm-virtual" nil nil nil) (autoload (quote vm-vs-sent-before) "vm-virtual" nil nil nil) (autoload (quote vm-vs-sent-after) "vm-virtual" nil nil nil) (autoload (quote vm-vs-header) "vm-virtual" nil nil nil) (autoload (quote vm-vs-label) "vm-virtual" nil nil nil) (autoload (quote vm-vs-text) "vm-virtual" nil nil nil) (autoload (quote vm-vs-more-chars-than) "vm-virtual" nil nil nil) (autoload (quote vm-vs-less-chars-than) "vm-virtual" nil nil nil) (autoload (quote vm-vs-more-lines-than) "vm-virtual" nil nil nil) (autoload (quote vm-vs-less-lines-than) "vm-virtual" nil nil nil) (autoload (quote vm-vs-new) "vm-virtual" nil nil nil) (autoload (quote vm-vs-unread) "vm-virtual" nil nil nil) (autoload (quote vm-vs-read) "vm-virtual" nil nil nil) (autoload (quote vm-vs-deleted) "vm-virtual" nil nil nil) (autoload (quote vm-vs-replied) "vm-virtual" nil nil nil) (autoload (quote vm-vs-forwarded) "vm-virtual" nil nil nil) (autoload (quote vm-vs-filed) "vm-virtual" nil nil nil) (autoload (quote vm-vs-written) "vm-virtual" nil nil nil) (autoload (quote vm-vs-marked) "vm-virtual" nil nil nil) (autoload (quote vm-vs-edited) "vm-virtual" nil nil nil) (autoload (quote vm-read-virtual-selector) "vm-virtual" nil nil nil) (autoload (quote vm-virtual-quit) "vm-virtual" nil nil nil) (autoload (quote vm-virtual-save-folder) "vm-virtual" nil nil nil) (autoload (quote vm-virtual-get-new-mail) "vm-virtual" nil nil nil) (autoload (quote vm-make-virtual-copy) "vm-virtual" nil nil nil) (autoload (quote vm-display) "vm-window" nil nil nil) (autoload (quote vm-display-buffer) "vm-window" nil nil nil) (autoload (quote vm-undisplay-buffer) "vm-window" nil nil nil) (autoload (quote vm-load-window-configurations) "vm-window" nil nil nil) (autoload (quote vm-store-window-configurations) "vm-window" nil nil nil) (autoload (quote vm-set-window-configuration) "vm-window" nil nil nil) (autoload (quote vm-record-current-window-configuration) "vm-window" nil nil nil) (autoload (quote vm-save-window-configuration) "vm-window" "Name and save the current window configuration. With this command you associate the current window setup with an action. Each time you perform this action VM will duplicate this window setup. Nearly every VM command can have a window configuration associated with it. VM also allows some category configurations, `startup', `reading-message', `composing-message', `editing-message', `marking-message' and `searching-message' for the commands that do these things. There is also a `default' configuration that VM will use if no other configuration is applicable. Command specific configurations are searched for first, then the category configurations and then the default configuration. The first configuration found is the one that is applied. The value of vm-mutable-windows must be non-nil for VM to use window configurations. If vm-mutable-frames is non-nil and Emacs is running under X windows, then VM will use all existing frames. Otherwise VM will restrict its changes to the frame in which it was started." t nil) (autoload (quote vm-buffer-to-label) "vm-window" nil nil nil) (autoload (quote vm-delete-window-configuration) "vm-window" "Delete the configuration saved for a particular action. This action will no longer have an associated window configuration. The action will be read from the minibuffer." t nil) (autoload (quote vm-apply-window-configuration) "vm-window" "Change the current window configuration to be one associated with a particular action. The action will be read from the minibuffer." t nil) (autoload (quote vm-window-help) "vm-window" nil t nil) (autoload (quote vm-window-loop) "vm-window" nil nil nil) (autoload (quote vm-frame-loop) "vm-window" nil nil nil) (autoload (quote vm-delete-windows-or-frames-on) "vm-window" nil nil nil) (autoload (quote vm-replace-buffer-in-windows) "vm-window" nil nil nil) (autoload (quote vm-get-buffer-window) "vm-window" nil nil nil) (autoload (quote vm-goto-new-frame) "vm-window" nil nil nil) (autoload (quote vm-menu) "vm-lucid" nil t nil) (autoload (quote vm-mouse-select) "vm-lucid" nil t nil) (autoload (quote vm-install-mouse-tracker) "vm-lucid" nil nil nil) (autoload (quote vm-install-menubar) "vm-lucid" nil nil nil) (autoload (quote vm-mail-mode-menu) "vm-lucid" "Pop up the VM mail mode menu, defined by the variable `vm-mail-mode-menu'." t nil)