/[emacs]/emacs/lisp/gnus/nnmaildir.el
ViewVC logotype

Diff of /emacs/lisp/gnus/nnmaildir.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by miles, Fri Mar 18 02:49:57 2005 UTC revision 1.4 by wl, Fri Mar 25 08:19:22 2005 UTC
# Line 978  by nnmaildir-request-article.") Line 978  by nnmaildir-request-article.")
978          (throw 'return nil))          (throw 'return nil))
979        (when (save-match-data (string-match "[\0/\t]" gname))        (when (save-match-data (string-match "[\0/\t]" gname))
980          (setf (nnmaildir--srv-error nnmaildir--cur-server)          (setf (nnmaildir--srv-error nnmaildir--cur-server)
981                (concat "Illegal characters (null, tab, or /) in group name: "                (concat "Invalid characters (null, tab, or /) in group name: "
982                        gname))                        gname))
983          (throw 'return nil))          (throw 'return nil))
984        (setq groups (nnmaildir--srv-groups nnmaildir--cur-server))        (setq groups (nnmaildir--srv-groups nnmaildir--cur-server))
# Line 1023  by nnmaildir-request-article.") Line 1023  by nnmaildir-request-article.")
1023          (throw 'return nil))          (throw 'return nil))
1024        (when (save-match-data (string-match "[\0/\t]" new-name))        (when (save-match-data (string-match "[\0/\t]" new-name))
1025          (setf (nnmaildir--srv-error nnmaildir--cur-server)          (setf (nnmaildir--srv-error nnmaildir--cur-server)
1026                (concat "Illegal characters (null, tab, or /) in group name: "                (concat "Invalid characters (null, tab, or /) in group name: "
1027                        new-name))                        new-name))
1028          (throw 'return nil))          (throw 'return nil))
1029        (if (string-equal gname new-name) (throw 'return t))        (if (string-equal gname new-name) (throw 'return t))

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26