comparison lisp/mh-e/mh-utils.el @ 70027:0e0916499a15

* mh-funcs.el (view-exit-action): No need to wrap defvar with eval-when-compile when shushing compiler. * mh-mime.el (mh-identity-pgg-default-user-id): Ditto. * mh-seq.el (view-exit-action): Ditto. * mh-show.el (font-lock-auto-fontify): Ditto. * mh-utils.el (mh-speed-flists-cache): Ditto
author Bill Wohler <wohler@newt.com>
date Fri, 14 Apr 2006 21:28:52 +0000
parents 6afc0d1f682b
children d81780942bb8
comparison
equal deleted inserted replaced
70026:a0de53f6c617 70027:0e0916499a15
655 (expand-file-name filename default))) 655 (expand-file-name filename default)))
656 656
657 (defvar mh-folder-hist nil) 657 (defvar mh-folder-hist nil)
658 658
659 ;; Shush compiler. 659 ;; Shush compiler.
660 (eval-when-compile (defvar mh-speed-flists-cache)) 660 (defvar mh-speed-flists-cache)
661 661
662 (defvar mh-allow-root-folder-flag nil 662 (defvar mh-allow-root-folder-flag nil
663 "Non-nil means \"+\" is an acceptable folder name. 663 "Non-nil means \"+\" is an acceptable folder name.
664 This variable is used to communicate with 664 This variable is used to communicate with
665 `mh-folder-completion-function'. That function can have exactly 665 `mh-folder-completion-function'. That function can have exactly