From 81851be8a05acbeeafb18fce032f4a9f45d4bd53 Mon Sep 17 00:00:00 2001 From: hmurata Date: Mon, 5 Nov 2001 14:09:01 +0000 Subject: [PATCH] * elmo-util.el (elmo-parse-token): Fixed how to treat quoted-pair in quoted-stirng. --- elmo/ChangeLog | 5 +++++ elmo/elmo-util.el | 6 +++--- 2 files changed, 8 insertions(+), 3 deletions(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 6d02a2e..3eb2350 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,8 @@ +2001-11-05 Hiroya Murata + + * elmo-util.el (elmo-parse-token): Fixed how to treat quoted-pair + in quoted-stirng. + 2001-11-05 Yuuichi Teranishi * elmo-pop3.el (elmo-folder-initialize): Rewrite. diff --git a/elmo/elmo-util.el b/elmo/elmo-util.el index 4a175fb..caacaeb 100644 --- a/elmo/elmo-util.el +++ b/elmo/elmo-util.el @@ -1362,8 +1362,8 @@ But if optional argument AUTO is non-nil, DEFAULT is returned." (cond ((and in (eq c ?\\)) (setq i (1+ i) - i (1+ i) - content (cons (aref string i) content))) + content (cons (aref string i) content) + i (1+ i))) ((eq c ?\") (setq in (not in) i (1+ i))) @@ -1384,7 +1384,7 @@ But if optional argument AUTO is non-nil, DEFAULT is returned." (cons "" string))) ;;; Number set defined by OKAZAKI Tetsurou -;; +;; ;; number ::= [0-9]+ ;; beg ::= number ;; end ::= number -- 1.7.10.4