Erase message.

[gnus] / lisp / webmail.el

diff --git a/lisp/webmail.el b/lisp/webmail.el
index a307f93..d947ca0 100644 (file)
--- a/lisp/webmail.el
+++ b/lisp/webmail.el
@@ -144,7 +144,7 @@
     (my-deja
      (paranoid cookie post)
      (address . "www.my-deja.com")
-     (open-url "http://www.my-deja.com/")
+     (open-url "http://www.deja.com/my/pr.xp")
      (open-snarf . webmail-my-deja-open)
      (login-url
       content 
@@ -282,8 +282,8 @@
   (if (gnus-buffer-live-p webmail-buffer)
       (set-buffer webmail-buffer)
     (setq webmail-buffer
-         (mm-with-unibyte
-           (nnheader-set-temp-buffer " *webmail*")))))
+         (nnheader-set-temp-buffer " *webmail*"))
+    (mm-disable-multibyte)))
 
 (defvar url-package-name)
 (defvar url-package-version)
@@ -428,7 +428,7 @@
          (setq site (match-string 1))
        (webmail-error "list@1"))
       (goto-char (point-min))
-      (if (re-search-forward "disk=\\([^&]+\\)&" nil t)
+      (if (re-search-forward "disk=\\([^&]*\\)&" nil t)
          (setq webmail-aux 
                (concat "http://" site "/cgi-bin/HoTMaiL?disk=" 
                        (match-string 1)))