*** empty log message ***

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7d5888e..35b5b38 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,30 @@
+Tue Jun 25 21:13:37 1996  Lars Magne Ingebrigtsen  <larsi@aegir.ifi.uio.no>
+
+       * gnus.el: Gnus v5.2.26 is released.
+
+Tue Jun 25 20:58:40 1996  Richard Stallman  <rms@gnu.ai.mit.edu>
+
+       * gnus-ems.el: Multiply color value by .6 instead of dividing by
+       3. 
+
+Tue Jun 25 12:34:24 1996  Lars Magne Ingebrigtsen  <larsi@ylfing.ifi.uio.no>
+
+       * message.el (message-send-news): Disable `existing-groups' check
+       when given a prefix.
+
+Mon Jun 24 16:54:26 1996  Alastair Burt  <burt@dfki.uni-kl.de>
+
+       * gnus-vis.el (gnus-summary-highlight-line): `default' mixed up
+       with fonts.
+
+Sat Jun 22 13:56:49 1996  Lars Magne Ingebrigtsen  <larsi@ifi.uio.no>
+
+       * gnus-cite.el (gnus-cache-close): New function.
+
+Sat Jun 22 11:33:42 1996  Lars Magne Ingebrigtsen  <larsi@ifi.uiof.no>
+
+       * gnus.el: Gnus v5.2.25 is released.
+
 Sat Jun 22 11:16:57 1996  Lars Magne Ingebrigtsen  <larsi@ifi.uio.no>
 
        * gnus.el (gnus-adjust-marked-articles): Would bug out on some

diff --git a/lisp/gnus-cite.el b/lisp/gnus-cite.el
index 0982f04..bc85ea4 100644 (file)
--- a/lisp/gnus-cite.el
+++ b/lisp/gnus-cite.el
@@ -720,6 +720,11 @@ See also the documentation for `gnus-article-highlight-citation'."
          (setq prefix (car entry))))
     prefix))
 
+(gnus-add-shutdown 'gnus-cache-close 'gnus)
+
+(defun gnus-cache-close ()
+  (setq gnus-cite-prefix-alist nil))
+
 (gnus-ems-redefine)
 
 (provide 'gnus-cite)

diff --git a/lisp/gnus-ems.el b/lisp/gnus-ems.el
index f114df1..fb19e6c 100644 (file)
--- a/lisp/gnus-ems.el
+++ b/lisp/gnus-ems.el
@@ -124,7 +124,7 @@ pounce directly on the real variables themselves.")
                  ((and (cdr (assq 'background-color params))
                        (< (apply '+ (x-color-values
                                      (cdr (assq 'background-color params))))
-                          (/ (apply '+ (x-color-values "white")) 3)))
+                          (* (apply '+ (x-color-values "white")) .6)))
                   'dark)
                  (t 'light)))
        (error 'light))

diff --git a/lisp/gnus-vis.el b/lisp/gnus-vis.el
index 5efaf1f..baddc09 100644 (file)
--- a/lisp/gnus-vis.el
+++ b/lisp/gnus-vis.el
@@ -989,13 +989,13 @@ HEADER is a regexp to match a header.  For a fuller explanation, see
         (score (or (cdr (assq (or article gnus-current-article)
                               gnus-newsgroup-scored))
                    gnus-summary-default-score 0))
-        (default gnus-summary-default-score)
         (mark (or (gnus-summary-article-mark) gnus-unread-mark))
         (inhibit-read-only t))
     ;; Eval the cars of the lists until we find a match.
-    (while (and list
-               (not (eval (caar list))))
-      (setq list (cdr list)))
+    (let ((default gnus-summary-default-score))
+      (while (and list
+                 (not (eval (caar list))))
+       (setq list (cdr list))))
     (let ((face (cdar list)))
       (unless (eq face (get-text-property beg 'face))
        (gnus-put-text-property 

diff --git a/lisp/gnus.el b/lisp/gnus.el
index 2d0e98e..4681f01 100644 (file)
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -1730,7 +1730,7 @@ variable (string, integer, character, etc).")
   "gnus-bug@ifi.uio.no (The Gnus Bugfixing Girls + Boys)"
   "The mail address of the Gnus maintainers.")
 
-(defconst gnus-version-number "5.2.25"
+(defconst gnus-version-number "5.2.26"
   "Version number for this version of Gnus.")
 
 (defconst gnus-version (format "Gnus v%s" gnus-version-number)
@@ -3212,6 +3212,9 @@ If RE-ONLY is non-nil, strip leading `Re:'s only."
        gnus-server-alist nil
        gnus-group-list-mode nil
        gnus-opened-servers nil
+       gnus-group-mark-positions nil
+       gnus-newsgroup-data nil
+       gnus-newsgroup-unreads nil
        gnus-current-select-method nil)
   (gnus-shutdown 'gnus)
   ;; Kill the startup file.
@@ -4187,7 +4190,7 @@ Note: LIST has to be sorted over `<'."
     "V" gnus-version
     "s" gnus-group-save-newsrc
     "z" gnus-group-suspend
-    "Z" gnus-group-clear-dribble
+;    "Z" gnus-group-clear-dribble
     "q" gnus-group-exit
     "Q" gnus-group-quit
     "?" gnus-group-describe-briefly

diff --git a/lisp/message.el b/lisp/message.el
index 0e69aac..0e94d64 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -1413,6 +1413,11 @@ the user from the mailer."
                    (funcall message-post-method arg)
                  message-post-method))
        (messbuf (current-buffer))
+       (message-syntax-checks
+        (if arg
+            (cons '(existing-newsgroups . disabled)
+                  message-syntax-checks)
+          message-syntax-checks))
        result)
     (save-restriction
       (message-narrow-to-headers)

diff --git a/lisp/nntp.el b/lisp/nntp.el
index f79f383..8b34460 100644 (file)
--- a/lisp/nntp.el
+++ b/lisp/nntp.el
@@ -397,7 +397,8 @@ servers."
             (buffer-name proc)
             (kill-buffer proc))))
     (nnoo-close-server 'nntp)
-    (setq nntp-async-group-alist nil)))
+    (setq nntp-async-group-alist nil
+         nntp-async-articles nil)))
 
 (deffoo nntp-server-opened (&optional server)
   "Say whether a connection to SERVER has been opened."

diff --git a/lisp/smiley.el b/lisp/smiley.el
index 583ce9b..1697f8f 100644 (file)
--- a/lisp/smiley.el
+++ b/lisp/smiley.el
@@ -33,6 +33,8 @@
 ;; (require 'smiley)
 ;; (add-hook 'gnus-article-display-hook 'gnus-smiley-display t)
 
+;; The smilies were drawn by Joe Reiss <joe@jreiss.async.vt.edu>. 
+
 (require 'annotations)
 (eval-when-compile (require 'cl))
 

diff --git a/texi/gnus.texi b/texi/gnus.texi
index 44794f1..bde5417 100644 (file)
--- a/texi/gnus.texi
+++ b/texi/gnus.texi
@@ -1539,6 +1539,7 @@ group will be created from from @code{gnus-group-archive-directory}.
 Make a kiboze group.  You will be prompted for a name, for a regexp to
 match groups to be ``included'' in the kiboze group, and a series of
 strings to match on headers (@code{gnus-group-make-kiboze-group}).
+@xref{Kibozed Groups}
 
 @item G D
 @kindex G D (Group)
@@ -2459,10 +2460,10 @@ Save the @file{.newsrc.eld} file (and @file{.newsrc} if wanted)
 (@code{gnus-group-save-newsrc}).  If given a prefix, force saving the
 file(s) whether Gnus thinks it is necessary or not.
 
-@item Z
-@kindex Z (Group)
-@findex gnus-group-clear-dribble
-Clear the dribble buffer (@code{gnus-group-clear-dribble}).
+@c @item Z
+@c @kindex Z (Group)
+@c @findex gnus-group-clear-dribble
+@c Clear the dribble buffer (@code{gnus-group-clear-dribble}).
 
 @end table
 
@@ -8728,6 +8729,10 @@ the news feed''.  @code{nnkiboze} is a backend that will do this for
 you.  Oh joy!  Now you can grind any @sc{nntp} server down to a halt
 with useless requests!  Oh happiness!
 
+@kindex G k (Group)
+To create a kibozed group, use the @kbd{G k} command in the group
+buffer. 
+
 The address field of the @code{nnkiboze} method is, as with
 @code{nnvirtual}, a regexp to match groups to be ``included'' in the
 @code{nnkiboze} group.  There most similarities between @code{nnkiboze}