X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fwebmail.el;h=ab82462507d1e70bb4792ace41894839a8b75ccf;hb=9b741e050b400987d68ff761c6cc3276c932839c;hp=b98bb696dd64e01993716f6c437d3f5ae70211c0;hpb=3738187cad20787b5b99c4061256e30e19ee721a;p=elisp%2Fgnus.git- diff --git a/lisp/webmail.el b/lisp/webmail.el index b98bb69..ab82462 100644 --- a/lisp/webmail.el +++ b/lisp/webmail.el @@ -392,7 +392,7 @@ (unless (equal total "0") (goto-char (point-min)) (if (re-search-forward - "https?://\\([^/]+hotmail\\.msn\\.com\\)/cgi-bin/" nil t) + "https?://\\([^/]+hotmail\\.msn\\.com\\)/cgi-bin/" nil t) (setq site (match-string 1)) (webmail-error "list@1")) (goto-char (point-min)) @@ -1081,7 +1081,7 @@ "type=hidden name=\"\\([^\"]+\\)\" value=\"\\([^\"]+\\)" nil t) (setq url (concat url "&" (match-string 1) "=" - (match-string 2)))) + (match-string 2)))) (delete-region (point-min) (point-max)) (save-excursion (set-buffer (generate-new-buffer " *webmail-att*"))