From 091eea4d890bd3f4d6f76827e06296c22f2a1a0a Mon Sep 17 00:00:00 2001 From: yamaoka Date: Thu, 4 Aug 2005 14:41:22 +0000 Subject: [PATCH] Synch to No Gnus 200508041313. --- lisp/ChangeLog | 1 + lisp/gnus-art.el | 11 +++++------ 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 14ff64d..bd052d5 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -5,6 +5,7 @@ (gnus-button-mid-or-mail-regexp, gnus-button-alist): Use it. (gnus-button-alist): Improve regexp for domain part of the MIDs for news:localpart@domain buttons. + (gnus-button-ctan-directory-regexp): Update. 2005-08-02 Katsumi Yamaoka diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index 870bfd2..95b78ca 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -6406,12 +6406,11 @@ The function must take one argument, the string naming the URL." (regexp :tag "Other"))) (defcustom gnus-button-ctan-directory-regexp - (concat - "\\(?:" - "biblio\\|digests\\|dviware\\|fonts\\|graphics\\|help\\|" - "indexing\\|info\\|language\\|macros\\|support\\|systems\\|" - "tds\\|tools\\|usergrps\\|web\\|nonfree\\|obsolete" - "\\)") + (regexp-opt + (list "archive-tools" "biblio" "bibliography" "digests" "documentation" + "dviware" "fonts" "graphics" "help" "indexing" "info" "language" + "languages" "macros" "nonfree" "obsolete" "support" "systems" + "tds" "tools" "usergrps" "web") t) "Regular expression for ctan directories. It should match all directories in the top level of `gnus-ctan-url'." :version "22.1" -- 1.7.10.4