*** empty log message ***
authorLars Magne Ingebrigtsen <larsi@gnus.org>
Wed, 1 Dec 1999 16:29:02 +0000 (16:29 +0000)
committerLars Magne Ingebrigtsen <larsi@gnus.org>
Wed, 1 Dec 1999 16:29:02 +0000 (16:29 +0000)
GNUS-NEWS
lisp/.cvsignore
lisp/ChangeLog
lisp/dgnushack.el
lisp/gnus-art.el
lisp/gnus-async.el
lisp/gnus-msg.el
lisp/gnus-sum.el
texi/message.texi

index 5a0267c..ae36555 100644 (file)
--- a/GNUS-NEWS
+++ b/GNUS-NEWS
@@ -28,3 +28,6 @@ subtly different manner.
 *** New web-based backends have been added: nnslashdot, nnwarchive
 and nnultimate.  nnweb has been revamped, again, to keep up with
 ever-changing layouts.
+
+*** Gnus can now read IMAP mail via nnimap.
+
index 16c0b7b..354079b 100644 (file)
@@ -1,2 +1,3 @@
 Makefile
 version
+*.elc
index 27fdc84..46c0f9c 100644 (file)
@@ -1,5 +1,21 @@
+Wed Dec  1 16:31:31 1999  Lars Magne Ingebrigtsen  <larsi@menja.ifi.uio.no>
+
+       * gnus.el: Pterodactyl Gnus v0.99 is released.
+
 1999-12-01 14:28:49  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * dgnushack.el (dgnushack-compile): No webmail under Emacs.
+
+       * gnus-sum.el (gnus-summary-refer-article): Wrong interactive
+       spec. 
+
+       * gnus-msg.el (gnus-configure-posting-styles): Eval `eval'.
+       (gnus-configure-posting-styles): No, don't.
+       (gnus-configure-posting-styles): Allow overriding files.
+
+       * gnus-art.el (gnus-header-button-alist): Use browse-url
+       directly. 
+
        * mm-decode.el (mm-inline-media-tests): Check feature vcard.
 
        * gnus-msg.el (gnus-summary-yank-message): New command and
index 4b305d7..5af2e61 100644 (file)
@@ -90,7 +90,7 @@ Modify to suit your needs."))
        (require 'w3-forms)
       (error
        (dolist (file '("nnweb.el" "nnlistserv.el" "nnultimate.el"
-                      "nnslashdot.el" "nnwarchive.el"))
+                      "nnslashdot.el" "nnwarchive.el" "webmail.el"))
         (setq files (delete file files)))))
     (while (setq file (pop files))
       (setq file (expand-file-name file srcdir))
index c4574f4..809169d 100644 (file)
@@ -3961,7 +3961,7 @@ groups."
     ;; This is how URLs _should_ be embedded in text...
     ("<URL: *\\([^>]*\\)>" 0 t gnus-button-embedded-url 1)
     ;; Raw URLs.
-    (,gnus-button-url-regexp 0 t gnus-button-url 0))
+    (,gnus-button-url-regexp 0 t browse-url 0))
   "*Alist of regexps matching buttons in article bodies.
 
 Each entry has the form (REGEXP BUTTON FORM CALLBACK PAR...), where
@@ -3989,9 +3989,9 @@ variable it the real callback function."
     ("^\\(From\\|Reply-To\\):" ": *\\(.+\\)$" 1 t gnus-button-reply 1)
     ("^\\(Cc\\|To\\):" "[^ \t\n<>,()\"]+@[^ \t\n<>,()\"]+"
      0 t gnus-button-mailto 0)
-    ("^X-[Uu][Rr][Ll]:" ,gnus-button-url-regexp 0 t gnus-button-url 0)
-    ("^Subject:" ,gnus-button-url-regexp 0 t gnus-button-url 0)
-    ("^[^:]+:" ,gnus-button-url-regexp 0 t gnus-button-url 0)
+    ("^X-[Uu][Rr][Ll]:" ,gnus-button-url-regexp 0 t browse-url 0)
+    ("^Subject:" ,gnus-button-url-regexp 0 t browse-url 0)
+    ("^[^:]+:" ,gnus-button-url-regexp 0 t browse-url 0)
     ("^[^:]+:" "\\(<\\(url: \\)?news:\\([^>\n ]*\\)>\\)" 1 t
      gnus-button-message-id 3))
   "*Alist of headers and regexps to match buttons in article heads.
@@ -4388,13 +4388,6 @@ forbidden in URL encoding."
   ;; Reply to ADDRESS.
   (message-reply address))
 
-(defun gnus-button-url (address)
-  "Browse ADDRESS."
-  ;; In Emacs 20, `browse-url-browser-function' may be an alist.
-  (if (listp browse-url-browser-function)
-      (browse-url address)
-    (funcall browse-url-browser-function address)))
-
 (defun gnus-button-embedded-url (address)
   "Browse ADDRESS."
   ;; In Emacs 20, `browse-url-browser-function' may be an alist.
index d9cf5fe..b290071 100644 (file)
@@ -149,7 +149,7 @@ It should return non-nil if the article is to be prefetched."
              (gnus-async-prefetch-article group next summary)
            (when gnus-async-timer
              (ignore-errors
-               (cancel-timer 'gnus-async-timer)))
+               (nnheader-cancel-timer 'gnus-async-timer)))
            (setq gnus-async-timer
                  (run-with-idle-timer
                   0.1 nil 'gnus-async-prefetch-article
index 91867ce..4bd55a6 100644 (file)
@@ -1173,7 +1173,7 @@ this is a reply."
              (setq element 'signature
                    filep t))
            ;; Get the contents of file elems.
-           (when filep
+           (when (and filep v)
              (setq v (with-temp-buffer
                        (insert-file-contents v)
                        (buffer-string))))
index ae200b1..dfc7dd9 100644 (file)
@@ -6724,7 +6724,7 @@ of what's specified by the `gnus-refer-thread-limit' variable."
 
 (defun gnus-summary-refer-article (message-id)
   "Fetch an article specified by MESSAGE-ID."
-  (interactive "sMessage-ID: \nP")
+  (interactive "sMessage-ID: ")
   (when (and (stringp message-id)
             (not (zerop (length message-id))))
     ;; Construct the correct Message-ID if necessary.
index f5182e2..f910c06 100644 (file)
@@ -1,7 +1,7 @@
 \input texinfo                  @c -*-texinfo-*-
 
 @setfilename message
-@settitle Pterodactyl Message 0.98 Manual
+@settitle Pterodactyl Message 0.99 Manual
 @synindex fn cp
 @synindex vr cp
 @synindex pg cp
@@ -42,7 +42,7 @@ into another language, under the above conditions for modified versions.
 @tex
 
 @titlepage
-@title Pterodactyl Message 0.98 Manual
+@title Pterodactyl Message 0.99 Manual
 
 @author by Lars Magne Ingebrigtsen
 @page
@@ -83,7 +83,7 @@ Message mode buffers.
 * Key Index::         List of Message mode keys.
 @end menu
 
-This manual corresponds to Pterodactyl Message 0.98.  Message is
+This manual corresponds to Pterodactyl Message 0.99.  Message is
 distributed with the Gnus distribution bearing the same version number
 as this manual.