X-Git-Url: https://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fnnimap.el;h=7a065ccaf83f9abfe31f8cf53dc8e115edb41d9e;hb=01d0e05aca10e5fbbbe6e38d9c3932d0576b79a2;hp=830aa7daf4abb86f4c7b33e4da737de2c7df1098;hpb=f3e2fabf3a0fab885ec1b9d8581b0d3a4f00db66;p=gnus diff --git a/lisp/nnimap.el b/lisp/nnimap.el index 830aa7daf..7a065ccaf 100644 --- a/lisp/nnimap.el +++ b/lisp/nnimap.el @@ -1212,13 +1212,18 @@ some servers.") (cond ((eql char ?\[) (split-string (buffer-substring - (1+ (point)) (1- (search-forward "]"))))) + (1+ (point)) + (1- (search-forward "]" (line-end-position) 'move))))) ((eql char ?\() (split-string (buffer-substring - (1+ (point)) (1- (search-forward ")"))))) + (1+ (point)) + (1- (search-forward ")" (line-end-position) 'move))))) ((eql char ?\") (forward-char 1) - (buffer-substring (point) (1- (search-forward "\"")))) + (buffer-substring + (point) + (1- (or (search-forward "\"" (line-end-position) 'move) + (point))))) (t (buffer-substring (point) (if (search-forward " " nil t) (1- (point))