diff options
| author | Bill Wohler | 2006-01-30 07:26:35 +0000 |
|---|---|---|
| committer | Bill Wohler | 2006-01-30 07:26:35 +0000 |
| commit | fd61b9aba222ac00cf8261524a12f3e51747c47c (patch) | |
| tree | 5c10fc549569faad3080883279feba9dd91741a3 /lisp | |
| parent | 090ccc5da85875b28d2e90d6e07eeef74338f1f3 (diff) | |
| download | emacs-fd61b9aba222ac00cf8261524a12f3e51747c47c.tar.gz emacs-fd61b9aba222ac00cf8261524a12f3e51747c47c.zip | |
(mh-scan-format-file-check): Allow any non-nil for
mh-adaptive-cmd-note-flag.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mh-e/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/mh-e/mh-e.el | 2 |
2 files changed, 4 insertions, 1 deletions
diff --git a/lisp/mh-e/ChangeLog b/lisp/mh-e/ChangeLog index 71ec35e0039..a018b66347e 100644 --- a/lisp/mh-e/ChangeLog +++ b/lisp/mh-e/ChangeLog | |||
| @@ -1,5 +1,8 @@ | |||
| 1 | 2006-01-29 Bill Wohler <wohler@newt.com> | 1 | 2006-01-29 Bill Wohler <wohler@newt.com> |
| 2 | 2 | ||
| 3 | * mh-e.el (mh-scan-format-file-check): Allow any non-nil for | ||
| 4 | mh-adaptive-cmd-note-flag. | ||
| 5 | |||
| 3 | * mh-comp.el (sc-cite-original): Remove autoload of "sc" with old | 6 | * mh-comp.el (sc-cite-original): Remove autoload of "sc" with old |
| 4 | docstring. sc-cite-original is autoloaded via loaddefs.el for all | 7 | docstring. sc-cite-original is autoloaded via loaddefs.el for all |
| 5 | supported versions. In addition, the package name "sc" has been | 8 | supported versions. In addition, the package name "sc" has been |
diff --git a/lisp/mh-e/mh-e.el b/lisp/mh-e/mh-e.el index f1ee071fad2..5b738933590 100644 --- a/lisp/mh-e/mh-e.el +++ b/lisp/mh-e/mh-e.el | |||
| @@ -1851,7 +1851,7 @@ Throw an error if user tries to set `mh-scan-format-file' to | |||
| 1851 | anything but t when `mh-adaptive-cmd-note-flag' is on. Otherwise, | 1851 | anything but t when `mh-adaptive-cmd-note-flag' is on. Otherwise, |
| 1852 | set SYMBOL to VALUE." | 1852 | set SYMBOL to VALUE." |
| 1853 | (if (and (not (eq value t)) | 1853 | (if (and (not (eq value t)) |
| 1854 | (eq mh-adaptive-cmd-note-flag t)) | 1854 | mh-adaptive-cmd-note-flag) |
| 1855 | (error "%s %s" "You must turn off `mh-adaptive-cmd-note-flag'" | 1855 | (error "%s %s" "You must turn off `mh-adaptive-cmd-note-flag'" |
| 1856 | "unless you use \"Use MH-E scan Format\"") | 1856 | "unless you use \"Use MH-E scan Format\"") |
| 1857 | (set-default symbol value))) | 1857 | (set-default symbol value))) |