From 3bdb2567a350246e68138f90580584329e5c237c Mon Sep 17 00:00:00 2001 From: Bill Wohler Date: Mon, 30 Jan 2006 03:39:36 +0000 Subject: [PATCH] (mh-note-copied, mh-note-printed): Reorganization revealed character constants that were still strings (closes SF #770772). --- lisp/mh-e/ChangeLog | 4 ++++ lisp/mh-e/mh-scan.el | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/mh-e/ChangeLog b/lisp/mh-e/ChangeLog index 98b97dbb3c8..b0c0f97add1 100644 --- a/lisp/mh-e/ChangeLog +++ b/lisp/mh-e/ChangeLog @@ -1,5 +1,9 @@ 2006-01-29 Bill Wohler + * mh-scan.el (mh-note-copied, mh-note-printed): Reorganization + revealed character constants that were still strings (closes SF + #770772). + * mh-comp.el (mh-letter-hide-all-skipped-fields) (mh-get-header-field): Move to mh-utils.el so that you can read messages without having to load mh-comp.el and mh-letter.el. diff --git a/lisp/mh-e/mh-scan.el b/lisp/mh-e/mh-scan.el index bac932141e4..8971c93a14d 100644 --- a/lisp/mh-e/mh-scan.el +++ b/lisp/mh-e/mh-scan.el @@ -370,7 +370,7 @@ This column will only ever have spaces in it.") "The current message (in MH, not in MH-E) is marked by this character. See also `mh-scan-cur-msg-number-regexp'.") -(defvar mh-note-copied "C" +(defvar mh-note-copied ?C "Messages that have been copied are marked by this character.") (defvar mh-note-deleted ?D @@ -383,7 +383,7 @@ See also `mh-scan-deleted-msg-regexp'.") (defvar mh-note-forw ?F "Messages that have been forwarded are marked by this character.") -(defvar mh-note-printed "P" +(defvar mh-note-printed ?P "Messages that have been printed are marked by this character.") (defvar mh-note-refiled ?^ -- 2.39.2