From 7d4dd8d71cba295dd0a57e5719cfde912bb237a1 Mon Sep 17 00:00:00 2001 From: teranisi Date: Fri, 1 Dec 2000 04:00:54 +0000 Subject: [PATCH] * elmo-nntp.el (elmo-nntp-get-folders-info): Fixed problem when '\' character is contained in user-id. (Reported by Yoichiro Okabe ) --- elmo/ChangeLog | 7 +++++++ elmo/elmo-nntp.el | 5 ++++- 2 files changed, 11 insertions(+), 1 deletion(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index c2e0d37..1e5827b 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,10 @@ +2000-12-01 Yuuichi Teranishi + + * elmo-nntp.el (elmo-nntp-get-folders-info): + Fixed problem when '\' character is contained in user-id. + (Reported by Yoichiro Okabe ) + + 2000-11-28 Yuuichi Teranishi * elmo-imap4.el (elmo-imap4-delete-folder): diff --git a/elmo/elmo-nntp.el b/elmo/elmo-nntp.el index 376bf47..1cc964c 100644 --- a/elmo/elmo-nntp.el +++ b/elmo/elmo-nntp.el @@ -1141,7 +1141,10 @@ Returns a list of cons cells like (NUMBER . VALUE)" (if (not (string= postfix "")) (save-excursion (replace-regexp "^\\(211 [0-9]+ [0-9]+ [0-9]+ [^ \n]+\\).*$" - (concat "\\1" postfix))))) + (concat "\\1" + (elmo-replace-in-string + postfix + "\\\\" "\\\\\\\\")))))) (let (len min max group) (while (not (eobp)) (condition-case () -- 1.7.10.4