(defvar wl-cs-cache wl-cs-local)
-(defvar wl-use-semi (module-installed-p 'mime-view) ; If nil, use tm.
- "*Use SEMI or not.")
-
(defcustom wl-from (and user-mail-address
(concat (and (user-full-name)
(concat (elmo-address-quote-specials
(const :format "%v " unread)))
:group 'wl-summary)
-(defcustom wl-summary-new-mark "N"
- "Mark for new message."
+(defcustom wl-summary-new-uncached-mark "N"
+ "Mark for new and uncached message."
+ :type '(string :tag "Mark")
+ :group 'wl-summary-marks)
+
+(defcustom wl-summary-new-cached-mark "?"
+ "Mark for new but already cached message."
:type '(string :tag "Mark")
:group 'wl-summary-marks)
:group 'wl-score)
(defcustom wl-summary-score-marks
- (list wl-summary-new-mark)
+ (list wl-summary-new-uncached-mark wl-summary-new-cached-mark)
"Persistent marks to scoring."
:type '(repeat (string :tag "Mark"))
:group 'wl-score)
:group 'wl-pref)
(defcustom wl-summary-auto-refile-skip-marks
- (list wl-summary-new-mark
+ (list wl-summary-new-uncached-mark
+ wl-summary-new-cached-mark
wl-summary-unread-uncached-mark
wl-summary-unread-cached-mark)
"Persistent marks to skip auto-refiling."
:group 'wl-summary)
(defcustom wl-summary-incorporate-marks
- (list wl-summary-new-mark
+ (list wl-summary-new-uncached-mark
wl-summary-unread-uncached-mark)
"Persistent marks to prefetch at `wl-summary-incorporate'."
:type '(repeat (string :tag "Mark"))
(defcustom wl-summary-expire-reserve-marks
(list wl-summary-important-mark
- wl-summary-new-mark
+ wl-summary-new-uncached-mark
+ wl-summary-new-cached-mark
wl-summary-unread-uncached-mark
wl-summary-unread-cached-mark)
"Permanent marks of reserved message when expire.
;;;; Obsolete variables.
+;; 2003-11-05
+(elmo-define-obsolete-variable 'wl-summary-new-mark
+ 'wl-summary-new-uncached-mark)
+
;; 2003-07-15 delete -> dispose
(elmo-define-obsolete-variable 'wl-delete-folder-alist
'wl-dispose-folder-alist)