Synch to No Gnus 200501161857.

diff --git a/GNUS-NEWS b/GNUS-NEWS
index 41677ff..caa6de6 100644 (file)
--- a/GNUS-NEWS
+++ b/GNUS-NEWS
@@ -48,7 +48,8 @@ ANSI sequences are used in some Chinese hierarchies for highlighting
 articles (`gnus-article-treat-ansi-sequences').
 
 ** International host names (IDNA) can now be decoded inside article
-bodies using `W i' (`gnus-summary-idna-message').
+bodies using `W i' (`gnus-summary-idna-message').  This require that
+GNU Libidn (`http://www.gnu.org/software/libidn/') has been installed.
 
 ** Gnus includes an Emacs Lisp SASL library.
 

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ce0c29d..891bdc0 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,10 @@
 2005-01-16  Simon Josefsson  <jas@extundo.com>
 
+       * gnus-sum.el (gnus-summary-idna-message): Fail gracefully if
+       idn/idna.el isn't available.
+       (gnus-summary-idna-message): Doc fix.  Suggested by Michael Cook
+       <michael@waxrat.com>.
+
        * hashcash.el: Remove non-FSF copyright header.
 
        * hashcash.el (hashcash-extra-generate-parameters): New variable.

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 4607132..152ed3a 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -9078,18 +9078,27 @@ forward."
   "Decode IDNA encoded domain names in the current articles.
 IDNA encoded domain names looks like `xn--bar'.  If a string
 remain unencoded after running this function, it is likely an
-invalid IDNA string (`xn--bar' is invalid)."
+invalid IDNA string (`xn--bar' is invalid).
+
+You must have GNU Libidn (`http://www.gnu.org/software/libidn/')
+installed for this command to work."
   (interactive "P")
-  (gnus-summary-select-article)
-  (let ((mail-header-separator ""))
-    (gnus-eval-in-buffer-window gnus-article-buffer
-      (save-restriction
-       (widen)
-       (let ((start (window-start))
-             buffer-read-only)
-         (while (re-search-forward "\\(xn--[-0-9a-z]+\\)" nil t)
-           (replace-match (idna-to-unicode (match-string 1))))
-         (set-window-start (get-buffer-window (current-buffer)) start))))))
+  (if (not (and (condition-case nil (require 'idna)
+                 (file-error))
+               (mm-coding-system-p 'utf-8)
+               (executable-find idna-program)))
+      (gnus-message
+       5 "GNU Libidn not installed properly (`idn' or `idna.el' missing)")
+    (gnus-summary-select-article)
+    (let ((mail-header-separator ""))
+      (gnus-eval-in-buffer-window gnus-article-buffer
+       (save-restriction
+         (widen)
+         (let ((start (window-start))
+               buffer-read-only)
+           (while (re-search-forward "\\(xn--[-0-9a-z]+\\)" nil t)
+             (replace-match (idna-to-unicode (match-string 1))))
+           (set-window-start (get-buffer-window (current-buffer)) start)))))))
 
 (autoload 'unmorse-region "morse"
   "Convert morse coded text in region to ordinary ASCII text."

diff --git a/texi/ChangeLog b/texi/ChangeLog
index 0cb175c..eb0384a 100644 (file)
--- a/texi/ChangeLog
+++ b/texi/ChangeLog
@@ -1,3 +1,10 @@
+2005-01-16  Simon Josefsson  <jas@extundo.com>
+
+       * gnus.texi (Article Washing): Add libidn URL.  Suggested by
+       Michael Cook <michael@waxrat.com>.
+
+       * gnus-news.texi: Ditto.
+
 2005-01-16  Xavier Maillard <zedek@gnu-rox.org> (tiny change)
 
        * gnus-faq.texi ([4.1]): Typo.

diff --git a/texi/gnus-ja.texi b/texi/gnus-ja.texi
index 6cd5da9..737a496 100644 (file)
--- a/texi/gnus-ja.texi
+++ b/texi/gnus-ja.texi
@@ -8157,7 +8157,9 @@ gnus \e$B$,5-;v$rI=<($9$k4{Dj$N$d$jJ}$rJQ$($?$$$H$-\e(B
 \e$B8=:_$N5-;v$K$"$k\e(B IDNA \e$B%(%s%3!<%I$5$l$?%I%a%$%sL>$r%G%3!<%I$7$^$9!#\e(B
 IDNA \e$B%(%s%3!<%I$5$l$?%I%a%$%sL>$O\e(B @samp{xn--bar} \e$B$N$h$&$K8+$($^$9!#$3$l\e(B
 \e$B$r<B9T$7$?8e$GJ8;zNs$,%G%3!<%I$5$l$J$$$^$^$@$C$?$i!"$*$=$i$/$=$l$OIT@5\e(B
-\e$B$J\e(B IDNA \e$BJ8;zNs$G$7$g$&\e(B (@samp{xn--bar} \e$B$OIT@5$G$9\e(B)\e$B!#\e(B
+\e$B$J\e(B IDNA \e$BJ8;zNs$G$7$g$&\e(B (@samp{xn--bar} \e$B$OIT@5$G$9\e(B)\e$B!#$3$N%3%^%s%I$rF0$+$9\e(B
+\e$B$?$a$K!"\e(BGNU Libidn (@url{http://www.gnu.org/software/libidn/}) \e$B$r%$%s%9\e(B
+\e$B%H!<%k$7$F$$$J$1$l$P$J$j$^$;$s!#\e(B
 
 @item W t
 @item t

diff --git a/texi/gnus-news.texi b/texi/gnus-news.texi
index 21f90df..c33aebf 100644 (file)
--- a/texi/gnus-news.texi
+++ b/texi/gnus-news.texi
@@ -62,7 +62,8 @@ highlighting articles (@code{gnus-article-treat-ansi-sequences}).
 
 @item International host names (@acronym{IDNA}) can now be decoded
 inside article bodies using @kbd{W i}
-(@code{gnus-summary-idna-message}).
+(@code{gnus-summary-idna-message}).  This require that GNU Libidn
+(@url{http://www.gnu.org/software/libidn/}) has been installed.
 
 @item Gnus includes an Emacs Lisp @acronym{SASL} library.
 

diff --git a/texi/gnus.texi b/texi/gnus.texi
index eac652c..d306eaf 100644 (file)
--- a/texi/gnus.texi
+++ b/texi/gnus.texi
@@ -8464,7 +8464,9 @@ Morse decode the article buffer (@code{gnus-summary-morse-message}).
 Decode IDNA encoded domain names in the current articles.  IDNA
 encoded domain names looks like @samp{xn--bar}.  If a string remain
 unencoded after running invoking this, it is likely an invalid IDNA
-string (@samp{xn--bar} is invalid).
+string (@samp{xn--bar} is invalid).  You must have GNU Libidn
+(@url{http://www.gnu.org/software/libidn/}) installed for this command
+to work.
 
 @item W t
 @item t