changeset 75555:d276dce1561f

Merge from gnus--rel--5.10 Patches applied: * gnus--rel--5.10 (patch 197-199) - Merge from emacs--devo--0 - Update from CVS 2007-01-28 Andreas Seltenreich <uwi7@rz.uni-karlsruhe.de> * lisp/gnus/nnslashdot.el (nnslashdot-request-article): Update end-of-article regexp. 2007-01-24 Katsumi Yamaoka <yamaoka@jpl.org> * lisp/gnus/uudecode.el (uudecode-string-to-multibyte): New function emulating string-to-multibyte. (uudecode-decode-region-internal): Use it. 2007-01-28 Andreas Seltenreich <uwi7@rz.uni-karlsruhe.de> * man/gnus.texi (Batching Agents): Fix example. Reported by Tassilo Horn <tassilo@member.fsf.org>. Revision: emacs@sv.gnu.org/emacs--devo--0--patch-621
author Miles Bader <miles@gnu.org>
date Tue, 30 Jan 2007 22:18:03 +0000
parents 26b46f8828ba
children 04f23eb0c0ca f83d17e1ace6
files lisp/gnus/ChangeLog lisp/gnus/nnslashdot.el lisp/gnus/uudecode.el man/ChangeLog man/gnus.texi
diffstat 5 files changed, 33 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog	Tue Jan 30 22:07:12 2007 +0000
+++ b/lisp/gnus/ChangeLog	Tue Jan 30 22:18:03 2007 +0000
@@ -2,6 +2,17 @@
 
 	* gnus-art.el (gnus-button-prefer-mid-or-mail): Fix typo in docstring.
 
+2007-01-28  Andreas Seltenreich  <uwi7@rz.uni-karlsruhe.de>
+
+	* nnslashdot.el (nnslashdot-request-article): Update end-of-article
+	regexp.
+
+2007-01-24  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* uudecode.el (uudecode-string-to-multibyte): New function emulating
+	string-to-multibyte.
+	(uudecode-decode-region-internal): Use it.
+
 2007-01-23  Reiner Steib  <Reiner.Steib@gmx.de>
 
 	* gnus-score.el (gnus-home-score-file, gnus-home-adapt-file): Fix
--- a/lisp/gnus/nnslashdot.el	Tue Jan 30 22:07:12 2007 +0000
+++ b/lisp/gnus/nnslashdot.el	Tue Jan 30 22:18:03 2007 +0000
@@ -259,7 +259,7 @@
 		      (buffer-substring
 		       (search-forward "<div class=\"commentBody\">")
 		       (progn
-			 (search-forward "<div class=\"commentSub\">")
+			 (search-forward "<div class=\"commentSub\"")
 			 (match-beginning 0))))))))
       (search-failed (nnslashdot-lose why)))
 
--- a/lisp/gnus/uudecode.el	Tue Jan 30 22:07:12 2007 +0000
+++ b/lisp/gnus/uudecode.el	Tue Jan 30 22:18:03 2007 +0000
@@ -128,6 +128,20 @@
 	  (message "Can not uudecode")))
       (ignore-errors (or file-name (delete-file tempfile))))))
 
+(eval-and-compile
+  (defalias 'uudecode-string-to-multibyte
+    (cond
+     ((featurep 'xemacs)
+      'identity)
+     ((fboundp 'string-to-multibyte)
+      'string-to-multibyte)
+     (t
+      (lambda (string)
+	"Return a multibyte string with the same individual chars as string."
+	(mapconcat
+	 (lambda (ch) (string-as-multibyte (char-to-string ch)))
+	 string ""))))))
+
 ;;;###autoload
 (defun uudecode-decode-region-internal (start end &optional file-name)
   "Uudecode region between START and END without using an external program.
@@ -206,7 +220,7 @@
 	  (or (markerp end) (setq end (set-marker (make-marker) end)))
 	  (goto-char start)
 	  (if enable-multibyte-characters
-	      (mapc #'(lambda (x) (insert (string-to-multibyte x)))
+	      (mapc #'(lambda (x) (insert (uudecode-string-to-multibyte x)))
 		    (nreverse result))
 	    (insert (apply 'concat (nreverse result))))
 	  (delete-region (point) end))))))
--- a/man/ChangeLog	Tue Jan 30 22:07:12 2007 +0000
+++ b/man/ChangeLog	Tue Jan 30 22:18:03 2007 +0000
@@ -3,6 +3,11 @@
 	* frames.texi (Secondary Selection): Window clicked does not matter
 	when mouse-yank-at-point is non-nil.
 
+2007-01-28  Andreas Seltenreich  <uwi7@rz.uni-karlsruhe.de>
+
+	* gnus.texi (Batching Agents): Fix example.  Reported by Tassilo Horn
+	<tassilo@member.fsf.org>.
+
 2007-01-27  Eli Zaretskii  <eliz@gnu.org>
 
 	* msdog.texi (ls in Lisp): Document ls-lisp-format-time-list and
--- a/man/gnus.texi	Tue Jan 30 22:07:12 2007 +0000
+++ b/man/gnus.texi	Tue Jan 30 22:18:03 2007 +0000
@@ -19040,7 +19040,7 @@
 
 @example
 #!/bin/sh
-emacs -batch -l ~/.emacs -l ~/.gnus.el gnus-agent-batch >/dev/null 2>&1
+emacs -batch -l ~/.emacs -l ~/.gnus.el -f gnus-agent-batch >/dev/null 2>&1
 @end example