diff options
| -rw-r--r-- | lisp/gnus/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/gnus/nnmaildir.el | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index d581274b803..5d15a6f9646 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2005-03-25 Werner Lemberg <wl@gnu.org> | ||
| 2 | |||
| 3 | * nnmaildir.el: Replace `illegal' with `invalid'. | ||
| 4 | |||
| 1 | 2005-03-22 Stefan Monnier <monnier@iro.umontreal.ca> | 5 | 2005-03-22 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 6 | ||
| 3 | * gnus-start.el (gnus-display-time-event-handler): | 7 | * gnus-start.el (gnus-display-time-event-handler): |
diff --git a/lisp/gnus/nnmaildir.el b/lisp/gnus/nnmaildir.el index 618418907e8..be94a57b5c7 100644 --- a/lisp/gnus/nnmaildir.el +++ b/lisp/gnus/nnmaildir.el | |||
| @@ -978,7 +978,7 @@ by nnmaildir-request-article.") | |||
| 978 | (throw 'return nil)) | 978 | (throw 'return nil)) |
| 979 | (when (save-match-data (string-match "[\0/\t]" gname)) | 979 | (when (save-match-data (string-match "[\0/\t]" gname)) |
| 980 | (setf (nnmaildir--srv-error nnmaildir--cur-server) | 980 | (setf (nnmaildir--srv-error nnmaildir--cur-server) |
| 981 | (concat "Illegal characters (null, tab, or /) in group name: " | 981 | (concat "Invalid characters (null, tab, or /) in group name: " |
| 982 | gname)) | 982 | gname)) |
| 983 | (throw 'return nil)) | 983 | (throw 'return nil)) |
| 984 | (setq groups (nnmaildir--srv-groups nnmaildir--cur-server)) | 984 | (setq groups (nnmaildir--srv-groups nnmaildir--cur-server)) |
| @@ -1023,7 +1023,7 @@ by nnmaildir-request-article.") | |||
| 1023 | (throw 'return nil)) | 1023 | (throw 'return nil)) |
| 1024 | (when (save-match-data (string-match "[\0/\t]" new-name)) | 1024 | (when (save-match-data (string-match "[\0/\t]" new-name)) |
| 1025 | (setf (nnmaildir--srv-error nnmaildir--cur-server) | 1025 | (setf (nnmaildir--srv-error nnmaildir--cur-server) |
| 1026 | (concat "Illegal characters (null, tab, or /) in group name: " | 1026 | (concat "Invalid characters (null, tab, or /) in group name: " |
| 1027 | new-name)) | 1027 | new-name)) |
| 1028 | (throw 'return nil)) | 1028 | (throw 'return nil)) |
| 1029 | (if (string-equal gname new-name) (throw 'return t)) | 1029 | (if (string-equal gname new-name) (throw 'return t)) |