← Back to branch summary

~vm/vm/vmpc-prompt

« back to all changes in this revision

Viewing changes to lisp/vm-vars.el

  • Committer: Uday S Reddy
  • Date: 2011-04-27 21:28:19 UTC
  • Revision ID: u.s.reddy@cs.bham.ac.uk-20110427212819-cpweqaba5upe8dyy
Added a variable vm-verbosity to control the chattiness of VM.

Show diffs side-by-side

added added

removed removed

Lines of Context:
lisp/vm-vars.el
200
200
(defcustom vm-fetched-message-limit 10
201
201
  "*Should be an integer representing the maximum number of messages
202
202
that VM should keep in the Folder buffer when the messages are
203
 
fetched, or nil to signify no limit."
 
203
fetched on demand, or nil to signify no limit."
204
204
  :group 'vm-folders
205
205
  :type '(choice (const :tag "No Limit" nil) 
206
206
                 (integer :tag "Number of Mesages")))
1052
1052
  :group 'vm-misc
1053
1053
  :type 'boolean)
1054
1054
 
 
1055
(defcustom vm-verbosity 8
 
1056
  "*Level of chattiness in progress messages displayed in the
 
1057
minibuffer.  Indicative levels are:
 
1058
  1 - extremely quiet
 
1059
  5 - normally level
 
1060
  7 - detailed level
 
1061
 10 - debugging information")
 
1062
 
1055
1063
(defface vm-highlighted-header '((t (:inherit bold)))
1056
1064
 "Default face used to highlight headers."
1057
1065
 :group 'vm-faces)
1747
1755
              file (expand-file-name name vmdir))
1748
1756
        (if (file-exists-p file)
1749
1757
            file
1750
 
;         (message "VM could not find executable %S!" name)
 
1758
;         (vm-inform 0 "VM could not find executable %S!" name)
1751
1759
          nil))))
1752
1760
 
1753
1761
(defcustom vm-imagemagick-convert-program (vm-locate-executable-file "convert")
6380
6388
    ("vm-yank-message-other-folder")
6381
6389
))
6382
6390
 
6383
 
(defcustom vm-vs-attachment-regexp "^Content-Disposition: attachment"
6384
 
  "Regexp used to detect attachments in a message."
6385
 
  :group 'vm-misc
6386
 
  :type 'regexp)
 
6391
(defconst vm-vs-attachment-regexp "^Content-Disposition: attachment"
 
6392
  "Regexp used to detect attachments in a message.")
6387
6393
 
6388
6394
(defvar vm-spam-words nil
6389
6395
  "A list of words often contained in spam messages.")