diff options
| author | Bill Wohler <wohler@newt.com> | 2005-10-14 16:05:37 +0000 |
|---|---|---|
| committer | Bill Wohler <wohler@newt.com> | 2005-10-14 16:05:37 +0000 |
| commit | a10f4ace50d2747876c0bb0cce3acb58822f2769 (patch) | |
| tree | 4321ba95a5b81ea60b4b541a6b91db2c2713add2 /lisp/mh-e/mh-seq.el | |
| parent | f28e9cbd37a11d734b4301a332661affee281aa2 (diff) | |
| download | emacs-a10f4ace50d2747876c0bb0cce3acb58822f2769.tar.gz | |
* mh-seq.el (mh-non-seq-mode-line-annotation): Moved
make-variable-buffer-local call to top level to avoid warnings in CVS
Emacs.
* mh-comp.el (mh-insert-letter): Replaced deprecated read-input with
read-string.
Diffstat (limited to 'lisp/mh-e/mh-seq.el')
| -rw-r--r-- | lisp/mh-e/mh-seq.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mh-e/mh-seq.el b/lisp/mh-e/mh-seq.el index 51847c2d59d..8459c6fdce6 100644 --- a/lisp/mh-e/mh-seq.el +++ b/lisp/mh-e/mh-seq.el @@ -224,6 +224,8 @@ appears." ;; Avoid compiler warning (defvar tool-bar-map) +(make-variable-buffer-local 'mh-non-seq-mode-line-annotation) + ;;;###mh-autoload (defun mh-narrow-to-seq (sequence) "Restrict display of this folder to just messages in SEQUENCE. @@ -243,7 +245,6 @@ Use \\<mh-folder-mode-map>\\[mh-widen] to undo this command." (mh-notate-deleted-and-refiled) (mh-notate-cur) (when msg-at-cursor (mh-goto-msg msg-at-cursor t t)) - (make-variable-buffer-local 'mh-non-seq-mode-line-annotation) (setq mh-non-seq-mode-line-annotation mh-mode-line-annotation) (setq mh-mode-line-annotation (symbol-name sequence)) (mh-make-folder-mode-line) |