From: yamaoka <yamaoka>
Date: Tue, 7 Jan 2003 00:14:29 +0000 (+0000)
Subject: Synch with Oort Gnus.
X-Git-Tag: t-gnus-6_15_12-00-quimby~43
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=8a81b0c27cac18be7b5715302421fe585c3c2a19;p=elisp%2Fgnus.git-

Synch with Oort Gnus.
---

diff --git a/etc/gnus/receipt.xpm b/etc/gnus/receipt.xpm
new file mode 100644
index 0000000..18caaf1
--- /dev/null
+++ b/etc/gnus/receipt.xpm
@@ -0,0 +1,32 @@
+/* XPM */
+static char * receipt_xpm[] = {
+"24 24 5 1",
+" 	c None",
+".	c #FFFFFFFFFFFF",
+"X	c #676766666363",
+"o	c #FFFF00000000",
+"O	c #AEAE3E3E4848",
+"                        ",
+"                        ",
+"                   ..   ",
+"                    .   ",
+"                     .  ",
+"                     .  ",
+"                   ..   ",
+"           Xooo  ..     ",
+"      Xoooooooo..       ",
+" Xoooooooooooooo  ...   ",
+" oooooooooooOOoo .      ",
+" ooooooooooOOOOo.       ",
+"  oooooooooOO...o       ",
+"  ooooooooooOOooo       ",
+"  ooooooooooooooo       ",
+"   ooooooooooooooo      ",
+"   oooooooooooooo       ",
+"   ooooooooooo          ",
+"    ooooooo             ",
+"    oooo                ",
+"    oo                  ",
+"                        ",
+"                        ",
+"                        "};
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index aa9f702..635fe94 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2003-01-07  Simon Josefsson  <jas@extundo.com>
+
+	* gnus-sieve.el (gnus-sieve-script): Use the crosspost argument to
+	gnus-sieve-script, instead of the global variable
+	gnus-sieve-crosspost.  One-line patch from Steinar Bang
+	<sb@dod.no>.
+
 2002-01-06  Kevin Greiner  <kgreiner@xpediantsolutions.com>
 
 	* gnus.el: Renamed gnus-summary-*-uncached-face as
diff --git a/lisp/gnus-sieve.el b/lisp/gnus-sieve.el
index 2fb82f9..106160c 100644
--- a/lisp/gnus-sieve.el
+++ b/lisp/gnus-sieve.el
@@ -226,7 +226,7 @@ This is returned as a string."
 	  (when spec
 	    (push (concat "if " (gnus-sieve-test spec) " {\n"
 			  "\tfileinto \"" (gnus-group-real-name group) "\";\n"
-			  (if gnus-sieve-crosspost
+			  (if crosspost
 			      ""
 			    "\tstop;\n")
 			  "}")