Sync with HEAD

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 6c3f1b5b6a5b965510273fa2fbb025cf025dd7c2..43be1e84e435a4eeec42c01a82069e8d5972bdfa 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,17 @@
+2004-03-05  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * message.el (message-mode): Fix last change.
+
+2004-03-04  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * message.el (message-mode): Set comment-start-skip.
+
+2004-02-08  Andreas Schwab  <schwab@suse.de>
+
+       * nnlistserv.el (nnlistserv-kk-wash-article): Fix paren nesting.
+
+       * gnus-score.el (gnus-summary-increase-score): Fix format string.
+
 2003-06-25  Sam Steingold  <sds@gnu.org>
 
        * gnus-group.el (gnus-group-suspend): Avoid some consing.
@@ -24,8 +38,8 @@
 
 2003-05-06  Jesper Harder  <harder@ifa.au.dk>
 
-       * gnus-cus.el (gnus-group-customize, gnus-score-parameters): Don't
-       quote nil and t in docstrings.
+       * gnus-cus.el (gnus-group-customize, gnus-score-parameters):
+       Don't quote nil and t in docstrings.
 
        * gnus-score.el (gnus-score-lower-thread): Likewise.
 
@@ -41,8 +55,7 @@
 
 2003-02-18  Juanma Barranquero  <lektu@terra.es>
 
-       * ietf-drums.el (ietf-drums-remove-whitespace): Fix character
-       constant.
+       * ietf-drums.el (ietf-drums-remove-whitespace): Fix character constant.
 
 2003-02-14  Juanma Barranquero  <lektu@terra.es>
 
@@ -11178,3 +11191,5 @@
     Copyright (C) 2002 Free Software Foundation, Inc.
   Copying and distribution of this file, with or without modification,
   are permitted provided the copyright notice and this notice are preserved.
+
+;;; arch-tag: 3f33a3e7-090d-492b-bedd-02a1417d32b4

diff --git a/lisp/gnus/ChangeLog.1 b/lisp/gnus/ChangeLog.1
index ea351cef9f04f2c851b69642fbf14c6468f2a05e..bb4da4dbcad82153ae227260786a7c813fe4a761 100644 (file)
--- a/lisp/gnus/ChangeLog.1
+++ b/lisp/gnus/ChangeLog.1
@@ -3729,3 +3729,5 @@
     Copyright (C) 1997, 1998, 1999 Free Software Foundation, Inc.
   Copying and distribution of this file, with or without modification,
   are permitted provided the copyright notice and this notice are preserved.
+
+;;; arch-tag: c2f4e9c8-94fb-4c63-bdfd-4ab680cc9db7

diff --git a/lisp/gnus/binhex.el b/lisp/gnus/binhex.el
index 40e9051e134b805c402cba196761fe9ac4a72d21..e73903de77fdc7782423681b570cd132555ef5b4 100644 (file)
--- a/lisp/gnus/binhex.el
+++ b/lisp/gnus/binhex.el
@@ -298,4 +298,5 @@ If HEADER-ONLY is non-nil only decode header and return filename."
 
 (provide 'binhex)
 
+;;; arch-tag: 8476badd-1e76-4f1d-a640-f9a38c72eed8
 ;;; binhex.el ends here

diff --git a/lisp/gnus/earcon.el b/lisp/gnus/earcon.el
index 2b1d9b1dcbc13ddf945b551c19c5c8b74ea60b6f..41aa66238c657f6369335d8ae522659b57703370 100644 (file)
--- a/lisp/gnus/earcon.el
+++ b/lisp/gnus/earcon.el
@@ -232,4 +232,5 @@ If N is negative, move backward instead."
 
 (run-hooks 'earcon-load-hook)
 
+;;; arch-tag: 844dfeea-980c-4ed0-907f-a30bf139691c
 ;;; earcon.el ends here

diff --git a/lisp/gnus/flow-fill.el b/lisp/gnus/flow-fill.el
index e8a39846c6073baa078d6fb9b7e03bbc88c95413..2d2e3e1c44df61caa49716da55d807159739f3db 100644 (file)
--- a/lisp/gnus/flow-fill.el
+++ b/lisp/gnus/flow-fill.el
@@ -100,4 +100,5 @@
 
 (provide 'flow-fill)
 
+;;; arch-tag: addc0040-bc53-4f17-b4bc-1eb44eed6f0b
 ;;; flow-fill.el ends here

diff --git a/lisp/gnus/format-spec.el b/lisp/gnus/format-spec.el
index 6cd39ede7214b5e94d1b6693947e599b3eaea42e..05a7f3b51d0af0bef41410498beb7905e008e1d1 100644 (file)
--- a/lisp/gnus/format-spec.el
+++ b/lisp/gnus/format-spec.el
@@ -68,4 +68,5 @@ starting with a character."
 
 (provide 'format-spec)
 
+;;; arch-tag: c22d49cf-d167-445d-b7f1-2504d4173f53
 ;;; format-spec.el ends here

diff --git a/lisp/gnus/gnus-agent.el b/lisp/gnus/gnus-agent.el
index 77e3043f823ae4ab724fe9cde7730926439d0702..1ecade30b5fe1a6fdb7183132550b7a114b8b3d1 100644 (file)
--- a/lisp/gnus/gnus-agent.el
+++ b/lisp/gnus/gnus-agent.el
@@ -1697,4 +1697,5 @@ The following commands are available:
 
 (provide 'gnus-agent)
 
+;;; arch-tag: b0ba4afc-5229-4cee-ad25-9956daa4e91e
 ;;; gnus-agent.el ends here

diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index b03c3e7191918cc7608e60c7624577e89fc31f20..0a9920c0387c0b10393357fa6dc32c0d60fa520a 100644 (file)
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -4910,4 +4910,5 @@ For example:
 
 (run-hooks 'gnus-art-load-hook)
 
+;;; arch-tag: 2654516f-6279-48f9-a83b-05c1fa450c33
 ;;; gnus-art.el ends here

diff --git a/lisp/gnus/gnus-async.el b/lisp/gnus/gnus-async.el
index e6616588cd64731f8ab97b0ff6d86b3054c6641a..6c34859ee71089d2969e7a7369698dcfdf56fd00 100644 (file)
--- a/lisp/gnus/gnus-async.el
+++ b/lisp/gnus/gnus-async.el
@@ -372,4 +372,5 @@ It should return non-nil if the article is to be prefetched."
 
 (provide 'gnus-async)
 
+;;; arch-tag: fee61de5-3ea2-4de6-8578-2f90ce89391d
 ;;; gnus-async.el ends here

diff --git a/lisp/gnus/gnus-audio.el b/lisp/gnus/gnus-audio.el
index b94de4bbd16d43ef74bfda08b54f2214c00ca1e7..349e3ff7732007aa9c4bb67a8dfffce680d9d496 100644 (file)
--- a/lisp/gnus/gnus-audio.el
+++ b/lisp/gnus/gnus-audio.el
@@ -146,4 +146,5 @@
 
 (run-hooks 'gnus-audio-load-hook)
 
+;;; arch-tag: 6f129e78-3416-4fc9-973f-6cf5ac8d654b
 ;;; gnus-audio.el ends here

diff --git a/lisp/gnus/gnus-bcklg.el b/lisp/gnus/gnus-bcklg.el
index 5a9cbf6c10f97ff7bad917b8abdff2129cec38fd..34a80924ed903b73364aaaefd324bca02d02fea0 100644 (file)
--- a/lisp/gnus/gnus-bcklg.el
+++ b/lisp/gnus/gnus-bcklg.el
@@ -155,4 +155,5 @@
 
 (provide 'gnus-bcklg)
 
+;;; arch-tag: 66259e56-505a-4bba-8a0d-3552c5b94e39
 ;;; gnus-bcklg.el ends here

diff --git a/lisp/gnus/gnus-cache.el b/lisp/gnus/gnus-cache.el
index dd664c2886acc81e2796bc2554714292d730c6fa..834a178812370d11c54ddfe29c38597f734c8ecd 100644 (file)
--- a/lisp/gnus/gnus-cache.el
+++ b/lisp/gnus/gnus-cache.el
@@ -679,4 +679,5 @@ If LOW, update the lower bound instead."
 
 (provide 'gnus-cache)
 
+;;; arch-tag: 05a79442-8c58-4e65-bd0a-3cbb1b89a33a
 ;;; gnus-cache.el ends here

diff --git a/lisp/gnus/gnus-cite.el b/lisp/gnus/gnus-cite.el
index 34acee5951498631329b883f4cd91a6d62458646..5a041d111979076cea9c8c24c9de62db66df8c31 100644 (file)
--- a/lisp/gnus/gnus-cite.el
+++ b/lisp/gnus/gnus-cite.el
@@ -998,4 +998,5 @@ See also the documentation for `gnus-article-highlight-citation'."
 ;; coding: iso-8859-1
 ;; End:
 
+;;; arch-tag: 1997b044-6067-471e-8c8f-dc903093098a
 ;;; gnus-cite.el ends here

diff --git a/lisp/gnus/gnus-cus.el b/lisp/gnus/gnus-cus.el
index a20852796f47de3f6b57667c9e628639d45689d8..dc5a9f39cc5ade4df20aa37e59461349954ad2b7 100644 (file)
--- a/lisp/gnus/gnus-cus.el
+++ b/lisp/gnus/gnus-cus.el
@@ -818,4 +818,5 @@ articles in the thread.
 
 (provide 'gnus-cus)
 
+;;; arch-tag: a37c285a-49bc-4235-8244-804536effeaf
 ;;; gnus-cus.el ends here

diff --git a/lisp/gnus/gnus-demon.el b/lisp/gnus/gnus-demon.el
index 6a77b8efcdbbdee2d47e3d830b47d11c90e4dc01..600d60af6eefbd7752b00abd62bfd5098baac846 100644 (file)
--- a/lisp/gnus/gnus-demon.el
+++ b/lisp/gnus/gnus-demon.el
@@ -320,4 +320,5 @@ minutes, the connection is closed."
 
 (provide 'gnus-demon)
 
+;;; arch-tag: 8dd5cd3d-6ae4-46b4-9b15-f5fca09fd392
 ;;; gnus-demon.el ends here

diff --git a/lisp/gnus/gnus-draft.el b/lisp/gnus/gnus-draft.el
index 182f4b3ef05beb34fee4cbd7a15e61263aae70b7..8ce449b72f358f2b84a610ef9e5f80f52ebb262e 100644 (file)
--- a/lisp/gnus/gnus-draft.el
+++ b/lisp/gnus/gnus-draft.el
@@ -221,4 +221,5 @@
 
 (provide 'gnus-draft)
 
+;;; arch-tag: 3d92af58-8c97-4a5c-9db4-a98e85198022
 ;;; gnus-draft.el ends here

diff --git a/lisp/gnus/gnus-dup.el b/lisp/gnus/gnus-dup.el
index e148f4574bd2f93e5f29b42c86d0151d74ef52c4..97a92ed36eed7b4e7e9d9dd2a3556ae98b9f596b 100644 (file)
--- a/lisp/gnus/gnus-dup.el
+++ b/lisp/gnus/gnus-dup.el
@@ -162,4 +162,5 @@ seen in the same session."
 
 (provide 'gnus-dup)
 
+;;; arch-tag: 903e94db-7b00-4d19-83ee-cf34a81fa5fb
 ;;; gnus-dup.el ends here

diff --git a/lisp/gnus/gnus-eform.el b/lisp/gnus/gnus-eform.el
index 9fe72420fc349dc0f89fcf5a50c3c7ae797c6cfd..e4c581b3d03b7bb6037ea3225c16c64cf8c172b0 100644 (file)
--- a/lisp/gnus/gnus-eform.el
+++ b/lisp/gnus/gnus-eform.el
@@ -128,4 +128,5 @@ of the buffer."
 
 (provide 'gnus-eform)
 
+;;; arch-tag: ef50678c-2c28-49ef-affc-e53b3b2c0bf6
 ;;; gnus-eform.el ends here

diff --git a/lisp/gnus/gnus-ems.el b/lisp/gnus/gnus-ems.el
index b52c0f75231080f9d89ede1daa29da823b5c5c3c..10fdb2dc7be5a307f6d84ff99f925b3fadef532e 100644 (file)
--- a/lisp/gnus/gnus-ems.el
+++ b/lisp/gnus/gnus-ems.el
@@ -267,4 +267,5 @@ for XEmacs."
 
 (provide 'gnus-ems)
 
+;;; arch-tag: e7360b45-14b5-4171-aa39-69a44aed3cdb
 ;;; gnus-ems.el ends here

diff --git a/lisp/gnus/gnus-gl.el b/lisp/gnus/gnus-gl.el
index a17e0ce919314dd2e75a61207b58f037c47226bc..4b6fb257a25024bd7aeb871d2dce420b5fd79d6e 100644 (file)
--- a/lisp/gnus/gnus-gl.el
+++ b/lisp/gnus/gnus-gl.el
@@ -856,4 +856,5 @@ If prefix argument ALL is non-nil, all articles are marked as read."
 
 (provide 'gnus-gl)
 
+;;; arch-tag: 6f1bab2c-c2a3-4764-9ef6-0714cd5902a4
 ;;; gnus-gl.el ends here

diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el
index 73733cc4f1341474a9349815da78da20d1f0dca6..bf31115a1cf8ae8a6c6268c81bcd294eec81cc30 100644 (file)
--- a/lisp/gnus/gnus-group.el
+++ b/lisp/gnus/gnus-group.el
@@ -3822,4 +3822,5 @@ This command may read the active file."
 
 (provide 'gnus-group)
 
+;;; arch-tag: 2eb5440f-0bca-4091-814c-e37817536af6
 ;;; gnus-group.el ends here

diff --git a/lisp/gnus/gnus-int.el b/lisp/gnus/gnus-int.el
index a0ecd9342550056b73b68d44dd8c430b5bf81139..89961281bbecc0691a08cecc7677b62df20d3c18 100644 (file)
--- a/lisp/gnus/gnus-int.el
+++ b/lisp/gnus/gnus-int.el
@@ -539,4 +539,5 @@ If GROUP is nil, all groups on GNUS-COMMAND-METHOD are scanned."
 
 (provide 'gnus-int)
 
+;;; arch-tag: bbc90087-9b7f-4017-a92c-3abf180ac86d
 ;;; gnus-int.el ends here

diff --git a/lisp/gnus/gnus-kill.el b/lisp/gnus/gnus-kill.el
index dfed2898ca5b8dda0bc0ebf12833e22fd96673fb..73ea066617b1658a02615c9c5a806f8774421be2 100644 (file)
--- a/lisp/gnus/gnus-kill.el
+++ b/lisp/gnus/gnus-kill.el
@@ -715,4 +715,5 @@ Usage: emacs -batch -l ~/.emacs -l gnus -f gnus-batch-score"
 
 (provide 'gnus-kill)
 
+;;; arch-tag: b30c0f53-df1a-490b-b81e-17b13474f395
 ;;; gnus-kill.el ends here

diff --git a/lisp/gnus/gnus-logic.el b/lisp/gnus/gnus-logic.el
index 9d2c009219f11194013e6a8efc3e642f28c39e57..28704b205e67fc2867b114ff184912ef2bc56d58 100644 (file)
--- a/lisp/gnus/gnus-logic.el
+++ b/lisp/gnus/gnus-logic.el
@@ -227,4 +227,5 @@
 
 (provide 'gnus-logic)
 
+;;; arch-tag: 9651a100-4a59-4b69-a55b-e511e67c0f8d
 ;;; gnus-logic.el ends here

diff --git a/lisp/gnus/gnus-mh.el b/lisp/gnus/gnus-mh.el
index dd54c8134df513265a4d93f8084db7d26d8fe19a..454feeb40c43ae3047e6e265be6c7dba1c172e77 100644 (file)
--- a/lisp/gnus/gnus-mh.el
+++ b/lisp/gnus/gnus-mh.el
@@ -108,4 +108,5 @@ Otherwise, it is like +news/group."
 
 (provide 'gnus-mh)
 
+;;; arch-tag: 2d5696d3-b363-48e5-8749-c256be56acca
 ;;; gnus-mh.el ends here

diff --git a/lisp/gnus/gnus-ml.el b/lisp/gnus/gnus-ml.el
index 156250e7f841ddae193a863042e6bef7101decd2..f99957971a8c6cf049d3ec6ef8aa0739ef65c32c 100644 (file)
--- a/lisp/gnus/gnus-ml.el
+++ b/lisp/gnus/gnus-ml.el
@@ -179,4 +179,5 @@
 
 (provide 'gnus-ml)
 
+;;; arch-tag: 936c0fe6-acce-4c16-87d0-eded88078896
 ;;; gnus-ml.el ends here

diff --git a/lisp/gnus/gnus-mlspl.el b/lisp/gnus/gnus-mlspl.el
index 9fd4d2b6692a063bf618f630b2dde020335c71b0..6b63a19707dcd5be737c73c35981f05ba413d189 100644 (file)
--- a/lisp/gnus/gnus-mlspl.el
+++ b/lisp/gnus/gnus-mlspl.el
@@ -230,4 +230,5 @@ Calling (gnus-group-split-fancy nil nil \"mail.misc\") returns:
 
 (provide 'gnus-mlspl)
 
+;;; arch-tag: 62b3381f-1e45-4b61-be1a-29fb27703322
 ;;; gnus-mlspl.el ends here

diff --git a/lisp/gnus/gnus-move.el b/lisp/gnus/gnus-move.el
index 36839c8d07e8199808b03fc0d442f95f3ba145e0..25ed57b75ba1935535483cf94b6eae53e13a8c74 100644 (file)
--- a/lisp/gnus/gnus-move.el
+++ b/lisp/gnus/gnus-move.el
@@ -182,4 +182,5 @@ Update the .newsrc.eld file to reflect the change of nntp server."
 
 (provide 'gnus-move)
 
+;;; arch-tag: 503742b8-7d66-4d79-bb31-4a698070707b
 ;;; gnus-move.el ends here

diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el
index 528789b6fe6f1bcc88f985b4ba20d6b3dc28208a..6a77c283661ebc02acc11ce615bdc959fd729bac 100644 (file)
--- a/lisp/gnus/gnus-msg.el
+++ b/lisp/gnus/gnus-msg.el
@@ -1311,4 +1311,5 @@ this is a reply."
 
 (provide 'gnus-msg)
 
+;;; arch-tag: 9f22b2f5-1c0a-49de-916e-4c88e984852b
 ;;; gnus-msg.el ends here

diff --git a/lisp/gnus/gnus-mule.el b/lisp/gnus/gnus-mule.el
index 9c1117b219916094f623087348d25a29b97b04f9..835311d0ea27561dda728ee5b73919a38710ea1a 100644 (file)
--- a/lisp/gnus/gnus-mule.el
+++ b/lisp/gnus/gnus-mule.el
@@ -71,4 +71,5 @@ rather than using this function."
 
 (provide 'gnus-mule)
 
+;;; arch-tag: 525e6b69-85de-4dfc-9dbb-764c795d63af
 ;;; gnus-mule.el ends here

diff --git a/lisp/gnus/gnus-nocem.el b/lisp/gnus/gnus-nocem.el
index 9b76ede9856c98c8b0b53e2b04a7a080d7c435ea..5ccb92b70e7af045f1c2e4a9c61a91adf6f2f8d8 100644 (file)
--- a/lisp/gnus/gnus-nocem.el
+++ b/lisp/gnus/gnus-nocem.el
@@ -386,4 +386,5 @@ valid issuer, which is much faster if you are selective about the issuers."
 
 (provide 'gnus-nocem)
 
+;;; arch-tag: 0e0c74ea-2f8e-4f3e-8fff-09f767c1adef
 ;;; gnus-nocem.el ends here

diff --git a/lisp/gnus/gnus-range.el b/lisp/gnus/gnus-range.el
index 9994be1e8c41bbccd8188fdd4133d01ef153928d..b31fc673bb846ff5d5edd3f495f90931f4f43eb8 100644 (file)
--- a/lisp/gnus/gnus-range.el
+++ b/lisp/gnus/gnus-range.el
@@ -389,4 +389,5 @@ modified."
 
 (provide 'gnus-range)
 
+;;; arch-tag: 4780bdd8-5a15-4aff-be28-18727895b6ad
 ;;; gnus-range.el ends here

diff --git a/lisp/gnus/gnus-salt.el b/lisp/gnus/gnus-salt.el
index dd2aa1f9d061454a006fa50839769e2504cd4592..a2c8d0609fb269775e041f8eb872c688940611e2 100644 (file)
--- a/lisp/gnus/gnus-salt.el
+++ b/lisp/gnus/gnus-salt.el
@@ -1037,4 +1037,5 @@ The following commands are available:
 
 (provide 'gnus-salt)
 
+;;; arch-tag: 35449164-77b3-4398-bcbd-a2e3e998f810
 ;;; gnus-salt.el ends here

diff --git a/lisp/gnus/gnus-score.el b/lisp/gnus/gnus-score.el
index 997d3b04274d0d39d27a8be9f1bdccbb1abddf49..0623d1bd8f18d03a47268840217a8f5f30d8a594 100644 (file)
--- a/lisp/gnus/gnus-score.el
+++ b/lisp/gnus/gnus-score.el
@@ -1,5 +1,5 @@
 ;;; gnus-score.el --- scoring code for Gnus
-;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001
+;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2004
 ;;        Free Software Foundation, Inc.
 
 ;; Author: Per Abrahamsen <amanda@iesd.auc.dk>
@@ -616,7 +616,7 @@ used as score."
              (gnus-score-insert-help "Match permanence" char-to-perm 2)))
 
          (gnus-score-kill-help-buffer)
-         (if mimic (message "%c %c %c" prefix hchar tchar pchar)
+         (if mimic (message "%c %c %c %c" prefix hchar tchar pchar)
            (message ""))
          (unless (setq temporary (cadr (assq pchar char-to-perm)))
            ;; Deal with der(r)ided superannuated paradigms.
@@ -2961,4 +2961,5 @@ See `(Gnus)Scoring Tips' for examples of good regular expressions."
 
 (provide 'gnus-score)
 
+;;; arch-tag: d3922589-764d-46ae-9954-9330fd192634
 ;;; gnus-score.el ends here

diff --git a/lisp/gnus/gnus-setup.el b/lisp/gnus/gnus-setup.el
index 54c5b1b38ce475f5414d9fe279fb2e413a61005c..1c8bb7c0f9e9ebaa0e4ae4e6b2257d15125366e1 100644 (file)
--- a/lisp/gnus/gnus-setup.el
+++ b/lisp/gnus/gnus-setup.el
@@ -191,4 +191,5 @@ score the alt hierarchy, you'd say \"!alt.all\"." t nil))
 
 (run-hooks 'gnus-setup-load-hook)
 
+;;; arch-tag: 08e4af93-8565-46bf-905c-36229400609d
 ;;; gnus-setup.el ends here

diff --git a/lisp/gnus/gnus-soup.el b/lisp/gnus/gnus-soup.el
index 1f4306869484071bb9362fa3a936ba8c9af0b43b..c02e23e9eae9b04141dcb912a07fc2392edd875f 100644 (file)
--- a/lisp/gnus/gnus-soup.el
+++ b/lisp/gnus/gnus-soup.el
@@ -573,4 +573,5 @@ Return whether the unpacking was successful."
 
 (provide 'gnus-soup)
 
+;;; arch-tag: eddfa69d-13e8-4aea-84ef-62a526ef185c
 ;;; gnus-soup.el ends here

diff --git a/lisp/gnus/gnus-spec.el b/lisp/gnus/gnus-spec.el
index 57c9997d26bc4aba866a13f9e5f384c6e1d20bb4..9daf599c0761445ed8c70355fd6d68b4a49cd1c3 100644 (file)
--- a/lisp/gnus/gnus-spec.el
+++ b/lisp/gnus/gnus-spec.el
@@ -553,4 +553,5 @@ If PROPS, insert the result."
 ;; coding: iso-8859-1
 ;; End:
 
+;;; arch-tag: a4328fa1-1f84-4b09-97ad-4b5767cfd50f
 ;;; gnus-spec.el ends here

diff --git a/lisp/gnus/gnus-srvr.el b/lisp/gnus/gnus-srvr.el
index db638fcc2c968fd668705cdbcc3c5a9bd165d4bd..31ad693a544ffdacaedaa0887bd232fb84d75419 100644 (file)
--- a/lisp/gnus/gnus-srvr.el
+++ b/lisp/gnus/gnus-srvr.el
@@ -808,4 +808,5 @@ buffer.
 
 (provide 'gnus-srvr)
 
+;;; arch-tag: c0117f64-27ca-475d-9406-8da6854c7a25
 ;;; gnus-srvr.el ends here

diff --git a/lisp/gnus/gnus-start.el b/lisp/gnus/gnus-start.el
index 6b06d40d3f2432732d553caaeac004f5207756c0..07d901fdac5f88dd33f8ff81d1b0af6c8f5ed0b4 100644 (file)
--- a/lisp/gnus/gnus-start.el
+++ b/lisp/gnus/gnus-start.el
@@ -2669,4 +2669,5 @@ If this variable is nil, don't do anything."
 
 (provide 'gnus-start)
 
+;;; arch-tag: f4584a22-b7b7-4853-abfc-a637329af5d2
 ;;; gnus-start.el ends here

diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index e1c9ddd23aaa61851cbe120e76639dbc08f0fc11..c7842e96c1815dcb8728e60b3a0c440f5ef2638b 100644 (file)
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -9900,4 +9900,5 @@ returned."
 
 (run-hooks 'gnus-sum-load-hook)
 
+;;; arch-tag: 17c6748f-6d00-4d36-bf01-835c42f31235
 ;;; gnus-sum.el ends here

diff --git a/lisp/gnus/gnus-topic.el b/lisp/gnus/gnus-topic.el
index 521269e6e9e772b016d9e587b93fa55bfda7c977..ce5c381f72ce3ee4643f1dbb7d4789e2828d804c 100644 (file)
--- a/lisp/gnus/gnus-topic.el
+++ b/lisp/gnus/gnus-topic.el
@@ -1616,4 +1616,5 @@ If REVERSE, reverse the sorting order."
 
 (provide 'gnus-topic)
 
+;;; arch-tag: bf176856-f30c-40f0-ae77-e41529a1134c
 ;;; gnus-topic.el ends here

diff --git a/lisp/gnus/gnus-undo.el b/lisp/gnus/gnus-undo.el
index 7dd333f1c938e3b8932eaa35576395b2710ab2ba..e812e032f46d467f54c35a1e90495420a3a96ad0 100644 (file)
--- a/lisp/gnus/gnus-undo.el
+++ b/lisp/gnus/gnus-undo.el
@@ -192,4 +192,5 @@ A numeric argument serves as a repeat count."
 
 (provide 'gnus-undo)
 
+;;; arch-tag: 0d787bc7-787d-499a-837f-211d2cb07f2e
 ;;; gnus-undo.el ends here

diff --git a/lisp/gnus/gnus-util.el b/lisp/gnus/gnus-util.el
index fa2f2a0eccba8f0b29b08af4251180162c83ea72..ca46e52fc305b960cac4cfae763f8f5d8269f35d 100644 (file)
--- a/lisp/gnus/gnus-util.el
+++ b/lisp/gnus/gnus-util.el
@@ -1010,4 +1010,5 @@ If you find some problem with the directory separator character, try
 
 (provide 'gnus-util)
 
+;;; arch-tag: f94991af-d32b-4c97-8c26-ca12a934de49
 ;;; gnus-util.el ends here

diff --git a/lisp/gnus/gnus-uu.el b/lisp/gnus/gnus-uu.el
index e92a76867631419ab4fefbed6b3696647f376cbc..55beb8eb2633fe46115bea76f7e4b7c3c1fc233e 100644 (file)
--- a/lisp/gnus/gnus-uu.el
+++ b/lisp/gnus/gnus-uu.el
@@ -2134,4 +2134,5 @@ If no file has been included, the user will be asked for a file."
 
 (provide 'gnus-uu)
 
+;;; arch-tag: 05312384-0a83-4720-9a58-b3160b888853
 ;;; gnus-uu.el ends here

diff --git a/lisp/gnus/gnus-vm.el b/lisp/gnus/gnus-vm.el
index 9024926e4416f0b829e83e2d6d3eaf86ffb93acd..36925fdff9153627f828b7fcedf84dba665cd9f8 100644 (file)
--- a/lisp/gnus/gnus-vm.el
+++ b/lisp/gnus/gnus-vm.el
@@ -105,4 +105,5 @@ save those articles instead."
 
 (provide 'gnus-vm)
 
+;;; arch-tag: 42ca7f88-a12f-461d-be3e-cac7efb44866
 ;;; gnus-vm.el ends here

diff --git a/lisp/gnus/gnus-win.el b/lisp/gnus/gnus-win.el
index a7d424414da6d6fa66a5985193f2343abd2f690b..fa082e7c1d03efbe9c45fb6570e149d7f8c2c861 100644 (file)
--- a/lisp/gnus/gnus-win.el
+++ b/lisp/gnus/gnus-win.el
@@ -552,4 +552,5 @@ should have point."
 
 (provide 'gnus-win)
 
+;;; arch-tag: ccd5a394-2ddf-4397-b8f8-6d80d3e46e2b
 ;;; gnus-win.el ends here

diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el
index 9ce98cd05acd32d34cd82b1ea6eb4f885b6bedc5..97a8d8587cfdf7112d3c3aae06885dd97150e100 100644 (file)
--- a/lisp/gnus/gnus.el
+++ b/lisp/gnus/gnus.el
@@ -2950,4 +2950,5 @@ prompt the user for the name of an NNTP server to use."
 
 (provide 'gnus)
 
+;;; arch-tag: acebeeab-f331-4f8f-a7ea-89c58c84f636
 ;;; gnus.el ends here

diff --git a/lisp/gnus/ietf-drums.el b/lisp/gnus/ietf-drums.el
index 1dc3cc7691f7ce18296067bf2a83df10d5e1ab4a..a6e118ab5cffbeda08f2005b6ad47bd6a695102b 100644 (file)
--- a/lisp/gnus/ietf-drums.el
+++ b/lisp/gnus/ietf-drums.el
@@ -248,4 +248,5 @@ backslash and doublequote.")
 
 (provide 'ietf-drums)
 
+;;; arch-tag: 379a0191-dbae-4ca6-a0f5-d4202c209ef9
 ;;; ietf-drums.el ends here

diff --git a/lisp/gnus/imap.el b/lisp/gnus/imap.el
index b6cb9a7fe0b358cb50cd02b403d7000f95c33a98..0fe3ed8850178ef4f754f2783cc099746e7240b3 100644 (file)
--- a/lisp/gnus/imap.el
+++ b/lisp/gnus/imap.el
@@ -2603,4 +2603,5 @@ Return nil if no complete line has arrived."
 
 (provide 'imap)
 
+;;; arch-tag: 27369ed6-33e4-482f-96f1-8bb906ba70f7
 ;;; imap.el ends here

diff --git a/lisp/gnus/mail-parse.el b/lisp/gnus/mail-parse.el
index 13ecd48fac6929d1078be82f022e6ccf6f35a79e..3d0394c43e5c6a0b64ab612f3f40e37fccdf260b 100644 (file)
--- a/lisp/gnus/mail-parse.el
+++ b/lisp/gnus/mail-parse.el
@@ -67,4 +67,5 @@
 
 (provide 'mail-parse)
 
+;;; arch-tag: 3e63d75c-c962-4784-ab01-7ba07ca9d2d4
 ;;; mail-parse.el ends here

diff --git a/lisp/gnus/mail-prsvr.el b/lisp/gnus/mail-prsvr.el
index a22accf11b09d512d7baa88a94300a378618c513..16dd50f4f07155de8663eded804652a6e4471d91 100644 (file)
--- a/lisp/gnus/mail-prsvr.el
+++ b/lisp/gnus/mail-prsvr.el
@@ -41,4 +41,5 @@ what the desired charsets is to be ignored.")
 
 (provide 'mail-prsvr)
 
+;;; arch-tag: 9ba878cc-8b43-4f7a-85b1-69b1a9a5d9f5
 ;;; mail-prsvr.el ends here

diff --git a/lisp/gnus/mail-source.el b/lisp/gnus/mail-source.el
index e9fc96087f1ee753c6e3499f8eb70d60208bc000..334d27550530f0007c1c51c1654e7276e983b875 100644 (file)
--- a/lisp/gnus/mail-source.el
+++ b/lisp/gnus/mail-source.el
@@ -929,4 +929,5 @@ This only works when `display-time' is enabled."
 
 (provide 'mail-source)
 
+;;; arch-tag: 72948025-1d17-4d6c-bb12-ef1aa2c490fd
 ;;; mail-source.el ends here

diff --git a/lisp/gnus/mailcap.el b/lisp/gnus/mailcap.el
index 4a029d812cce8c5dfefbc48b09a2a98d7b878bca..1663bd3f5f8388fdca84aba45cc12ae4093ba876 100644 (file)
--- a/lisp/gnus/mailcap.el
+++ b/lisp/gnus/mailcap.el
@@ -946,4 +946,5 @@ If FORCE, re-parse even if already parsed."
 
 (provide 'mailcap)
 
+;;; arch-tag: 1fd4f9c9-c305-4d2e-9747-3a4d45baa0bd
 ;;; mailcap.el ends here

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 5aa9eabccdf74685595300058b16944d265707f7..4c6284b6d85cb6314a790755d955a1e35e51e649 100644 (file)
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -1,5 +1,5 @@
 ;;; message.el --- composing mail and news messages  -*- coding: iso-latin-1 -*-
-;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002
+;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2004
 ;;        Free Software Foundation, Inc.
 
 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
@@ -1531,7 +1531,10 @@ M-RET    `message-newline-and-reformat' (break the line and reformat)."
   (set (make-local-variable 'message-mime-part) 0)
   (message-setup-fill-variables)
   ;; Allow using comment commands to add/remove quoting.
-  (set (make-local-variable 'comment-start) message-yank-prefix)
+  (when message-yank-prefix
+    (set (make-local-variable 'comment-start) message-yank-prefix)
+    (set (make-local-variable 'comment-start-skip)
+        (concat "^" (regexp-quote message-yank-prefix) "[ \t]*")))
   ;;(when (fboundp 'mail-hist-define-keys)
   ;;  (mail-hist-define-keys))
   (if (featurep 'xemacs)
@@ -4720,4 +4723,5 @@ regexp varstr."
 ;; coding: iso-8859-1
 ;; End:
 
+;;; arch-tag: 94b32cac-4504-4b6c-8181-030ebf380ee0
 ;;; message.el ends here

diff --git a/lisp/gnus/messcompat.el b/lisp/gnus/messcompat.el
index fc3d52cc23fa442610d30503c340e2781a3020d6..796b346c9d924f70c438a9d64192043c500a7bc2 100644 (file)
--- a/lisp/gnus/messcompat.el
+++ b/lisp/gnus/messcompat.el
@@ -91,4 +91,5 @@ variable `mail-header-separator'.")
 
 (provide 'messcompat)
 
+;;; arch-tag: a76673be-905e-4bbd-8966-615370494a7b
 ;;; messcompat.el ends here

diff --git a/lisp/gnus/mm-bodies.el b/lisp/gnus/mm-bodies.el
index ab8ab1ccacb7dfc3f1c84ae5be247c23bf084f9a..b3c7e31bd8d2f7b8506cef64a9c91e3f9aa4a88c 100644 (file)
--- a/lisp/gnus/mm-bodies.el
+++ b/lisp/gnus/mm-bodies.el
@@ -229,4 +229,5 @@ The characters in CHARSET should then be decoded."
 
 (provide 'mm-bodies)
 
+;;; arch-tag: 41104bb6-4443-4ca9-8d5c-ff87ecf27d8d
 ;;; mm-bodies.el ends here

diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el
index 201ed291b7b7b7ebba9e61460db75c4888129e37..8dab45c2babad295911abd661e63e66b178d587e 100644 (file)
--- a/lisp/gnus/mm-decode.el
+++ b/lisp/gnus/mm-decode.el
@@ -850,4 +850,5 @@ external if displayed external."
 
 (provide 'mm-decode)
 
+;;; arch-tag: 4f35d360-56b8-4030-9388-3ed82d359b9b
 ;;; mm-decode.el ends here

diff --git a/lisp/gnus/mm-encode.el b/lisp/gnus/mm-encode.el
index 0d585a651a58e1e107b801196f54e74a1d497ab6..dd6974a70904b98f9f4e4cdebd8b6df3f16154d9 100644 (file)
--- a/lisp/gnus/mm-encode.el
+++ b/lisp/gnus/mm-encode.el
@@ -172,4 +172,5 @@ The encoding used is returned."
 
 (provide 'mm-encode)
 
+;;; arch-tag: 7d01bba4-d469-4851-952b-dc863f84ed66
 ;;; mm-encode.el ends here

diff --git a/lisp/gnus/mm-partial.el b/lisp/gnus/mm-partial.el
index 3598d5fa6916dfd64777d0afbca2e5405b57d7f3..f424062130b8d0ec5316820c0998e11d9721fd08 100644 (file)
--- a/lisp/gnus/mm-partial.el
+++ b/lisp/gnus/mm-partial.el
@@ -149,4 +149,5 @@ If NO-DISPLAY is nil, display it. Otherwise, do nothing after replacing."
                  (error nil))
                (delete-region ,(point-min-marker) ,(point-max-marker))))))))))
 
+;;; arch-tag: 460e7424-05f2-4a1d-a0f2-70ec081eff7d
 ;;; mm-partial.el ends here

diff --git a/lisp/gnus/mm-util.el b/lisp/gnus/mm-util.el
index 421a2204d1273c2133c69509be93b55d688d7a91..a64e9d1cb50089b3a4d3937c666c74b5df628c53 100644 (file)
--- a/lisp/gnus/mm-util.el
+++ b/lisp/gnus/mm-util.el
@@ -424,7 +424,7 @@ If the charset is `composition', return the actual one."
     (mm-mule-charset-to-mime-charset charset)))
 
 (defun mm-delete-duplicates (list)
-  "Simple  substitute for CL `delete-duplicates', testing with `equal'."
+  "Simple substitute for CL `delete-duplicates', testing with `equal'."
   (let (result head)
     (while list
       (setq head (car list))
@@ -670,4 +670,5 @@ If INHIBIT is non-nil, inhibit mm-inhibit-file-name-handlers."
 
 (provide 'mm-util)
 
+;;; arch-tag: 94dc5388-825d-4fd1-bfa5-2100aa351238
 ;;; mm-util.el ends here

diff --git a/lisp/gnus/mm-uu.el b/lisp/gnus/mm-uu.el
index a9609a72216d0c965bf44d135442c310d12806a6..671f9550525559c225522774e0b42b42741f79b0 100644 (file)
--- a/lisp/gnus/mm-uu.el
+++ b/lisp/gnus/mm-uu.el
@@ -247,4 +247,5 @@ To disable dissecting shar codes, for instance, add
 
 (provide 'mm-uu)
 
+;;; arch-tag: 7db076bf-53db-4320-aa19-ca76a1d2ab2c
 ;;; mm-uu.el ends here

diff --git a/lisp/gnus/mm-view.el b/lisp/gnus/mm-view.el
index 02827262a84d9defe2295839c2d4a4330f48f0dd..f7dfdb60f02b34ee07c34f99894a89a75e0988fb 100644 (file)
--- a/lisp/gnus/mm-view.el
+++ b/lisp/gnus/mm-view.el
@@ -303,4 +303,5 @@
 
 (provide 'mm-view)
 
+;;; arch-tag: b60e749a-d05c-47f2-bccd-bdaa59327cb2
 ;;; mm-view.el ends here

diff --git a/lisp/gnus/mml.el b/lisp/gnus/mml.el
index 2dd4cd43f298a33208f87d04b5bd07bc4f5769cd..8b1e4b63e555663fe451e377777a2ca7f75e10ac 100644 (file)
--- a/lisp/gnus/mml.el
+++ b/lisp/gnus/mml.el
@@ -867,4 +867,5 @@ If RAW, don't highlight the article."
 
 (provide 'mml)
 
+;;; arch-tag: 583c96cf-1ffe-451b-a5e5-4733ae9ddd12
 ;;; mml.el ends here

diff --git a/lisp/gnus/nnagent.el b/lisp/gnus/nnagent.el
index 8cc48f15f6b87c67c1f0f22ce424d366c5bb3bc7..653f89c9d99c20c96e6ba635c159d5bbd4721689 100644 (file)
--- a/lisp/gnus/nnagent.el
+++ b/lisp/gnus/nnagent.el
@@ -201,4 +201,5 @@
 
 (provide 'nnagent)
 
+;;; arch-tag: af710b77-f816-4969-af31-6fd94fb42245
 ;;; nnagent.el ends here

diff --git a/lisp/gnus/nnbabyl.el b/lisp/gnus/nnbabyl.el
index 4dd06ea632b0397553c34801788edf71ffe754e9..b3b67da5cbd359271a0756a74df9df3fe04dec34 100644 (file)
--- a/lisp/gnus/nnbabyl.el
+++ b/lisp/gnus/nnbabyl.el
@@ -660,4 +660,5 @@
 
 (provide 'nnbabyl)
 
+;;; arch-tag: aa7ddedb-8c07-4c0e-beb0-58e795c2b81b
 ;;; nnbabyl.el ends here

diff --git a/lisp/gnus/nndir.el b/lisp/gnus/nndir.el
index f1a6635c69e79c6cade5f102798dc9582f064ce6..b72a152368fb277e348cf8a91c28006cdb15f266 100644 (file)
--- a/lisp/gnus/nndir.el
+++ b/lisp/gnus/nndir.el
@@ -98,4 +98,5 @@
 
 (provide 'nndir)
 
+;;; arch-tag: 56f09f68-0e4e-4816-818a-df80b4a394c8
 ;;; nndir.el ends here

diff --git a/lisp/gnus/nndoc.el b/lisp/gnus/nndoc.el
index 3d28f8ea716a32fb47baa7945aae6e38adc05d3b..85f13d9372db14c1d00c50d7e9d40ead7e626cc5 100644 (file)
--- a/lisp/gnus/nndoc.el
+++ b/lisp/gnus/nndoc.el
@@ -993,4 +993,5 @@ symbol in the alist."
 
 (provide 'nndoc)
 
+;;; arch-tag: f5c2970e-0387-47ac-a0b3-6cc317dffabe
 ;;; nndoc.el ends here

diff --git a/lisp/gnus/nndraft.el b/lisp/gnus/nndraft.el
index 1d320a552925440dbd0d2ef06c41e65fb6c78c84..517f08aacf46557dad5b36686c6f83d56d73415c 100644 (file)
--- a/lisp/gnus/nndraft.el
+++ b/lisp/gnus/nndraft.el
@@ -264,4 +264,5 @@
 
 (provide 'nndraft)
 
+;;; arch-tag: 3ce26ca0-41cb-48b1-8703-4dad35e188aa
 ;;; nndraft.el ends here

diff --git a/lisp/gnus/nneething.el b/lisp/gnus/nneething.el
index 70c5fcea2c0ab0b79c2438b8bf351184a3fadda3..715c3d890c4c37c245b9c208b02c765c7a04ec8a 100644 (file)
--- a/lisp/gnus/nneething.el
+++ b/lisp/gnus/nneething.el
@@ -370,4 +370,5 @@ included.")
 
 (provide 'nneething)
 
+;;; arch-tag: 1277f386-88f2-4459-bb24-f3f45962a6c5
 ;;; nneething.el ends here

diff --git a/lisp/gnus/nnfolder.el b/lisp/gnus/nnfolder.el
index b054d817449f5f3e58254dc779d56161f872f12c..b4699c4e5be29a614cce45fb995002e2303b3e05 100644 (file)
--- a/lisp/gnus/nnfolder.el
+++ b/lisp/gnus/nnfolder.el
@@ -901,4 +901,5 @@ This command does not work if you use short group names."
 
 (provide 'nnfolder)
 
+;;; arch-tag: a040d0f4-4f4e-445f-8972-839575c5f7e6
 ;;; nnfolder.el ends here

diff --git a/lisp/gnus/nngateway.el b/lisp/gnus/nngateway.el
index 65bd2cc81c25cbeb4c9f55ae9f8ce97bc2e35bb0..8d8d4f900a9328630eeda5f4e0a5dea176d1aaca 100644 (file)
--- a/lisp/gnus/nngateway.el
+++ b/lisp/gnus/nngateway.el
@@ -90,4 +90,5 @@ parameter -- the gateway address.")
 
 (provide 'nngateway)
 
+;;; arch-tag: f7ecb92e-b10c-43d5-9a9b-1314233341fc
 ;;; nngateway.el ends here

diff --git a/lisp/gnus/nnheader.el b/lisp/gnus/nnheader.el
index 53ab2d88ebb3f75387c6bb0d8988b6e1a585b6eb..bfe50364e6251bd3b39a4e09e76a05889dc17187 100644 (file)
--- a/lisp/gnus/nnheader.el
+++ b/lisp/gnus/nnheader.el
@@ -925,4 +925,5 @@ find-file-hooks, etc.
 
 (provide 'nnheader)
 
+;;; arch-tag: a9c4b7d9-52ae-4ec9-b196-dfd93124d202
 ;;; nnheader.el ends here

diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index 145fd994364d31786e9a18fe0367671f305f61ff..02cb87af28bea7c77a9fad159225a546f89e3557 100644 (file)
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -1383,4 +1383,5 @@ sure of changing the value of `foo'."
 
 (provide 'nnimap)
 
+;;; arch-tag: 2b001f20-3ff9-4094-a0ad-46807c1ba70b
 ;;; nnimap.el ends here

diff --git a/lisp/gnus/nnkiboze.el b/lisp/gnus/nnkiboze.el
index 58157c0f3ae9b3f09375279151c869bbb7b9cb15..1cd1d1d1789f95c397f60fee4148300ef8c6ffc9 100644 (file)
--- a/lisp/gnus/nnkiboze.el
+++ b/lisp/gnus/nnkiboze.el
@@ -387,4 +387,5 @@ Finds out what articles are to be part of the nnkiboze groups."
 
 (provide 'nnkiboze)
 
+;;; arch-tag: 66068271-bdc9-4801-bcde-779702e73a05
 ;;; nnkiboze.el ends here

diff --git a/lisp/gnus/nnlistserv.el b/lisp/gnus/nnlistserv.el
index bc5991c05fc331e33cd6676bd498962486c24603..b6ce46c82f2a1a2e6875ab0bb153f208a90b844d 100644 (file)
--- a/lisp/gnus/nnlistserv.el
+++ b/lisp/gnus/nnlistserv.el
@@ -1,6 +1,6 @@
 ;;; nnlistserv.el --- retrieving articles via web mailing list archives
 
-;; Copyright (C) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
+;; Copyright (C) 1997, 1998, 1999, 2000, 2004 Free Software Foundation, Inc.
 
 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
 ;; Keywords: news, mail
@@ -127,7 +127,7 @@
     (nnweb-decode-entities)
     (while headers
       (goto-char (point-min))
-      (re-search-forward (format "<!-- %s=\"\\([^\"]+\\)" (car headers) nil t))
+      (re-search-forward (format "<!-- %s=\"\\([^\"]+\\)" (car headers)) nil t)
       (set (pop headers) (match-string 1)))
     (goto-char (point-min))
     (search-forward "<!-- body" nil t)
@@ -154,4 +154,5 @@
 
 (provide 'nnlistserv)
 
+;;; arch-tag: 7705176f-d332-4a5e-a520-d0d319445617
 ;;; nnlistserv.el ends here

diff --git a/lisp/gnus/nnmail.el b/lisp/gnus/nnmail.el
index 99c856a702c111137aed45525749b5ec5c2c3100..5153921a8da878ec89b0db5b8b62c7e67f37aea5 100644 (file)
--- a/lisp/gnus/nnmail.el
+++ b/lisp/gnus/nnmail.el
@@ -1746,4 +1746,5 @@ Doesn't change point."
 
 (provide 'nnmail)
 
+;;; arch-tag: fe8f671a-50db-428a-bb5d-f00462f72ed7
 ;;; nnmail.el ends here

diff --git a/lisp/gnus/nnmbox.el b/lisp/gnus/nnmbox.el
index 8624fb3c3765860e70cea7a33a1100829206d99b..099d82c3c2914612d795b00058b9434bb8bbabca 100644 (file)
--- a/lisp/gnus/nnmbox.el
+++ b/lisp/gnus/nnmbox.el
@@ -596,4 +596,5 @@
 
 (provide 'nnmbox)
 
+;;; arch-tag: 611dd95f-be37-413a-b3ae-8b059ba93659
 ;;; nnmbox.el ends here

diff --git a/lisp/gnus/nnmh.el b/lisp/gnus/nnmh.el
index 27ff9f11f529de88ef20d3066f83bb50ee8d4dec..301a349285394b5938047672f7c30ca4d79508fb 100644 (file)
--- a/lisp/gnus/nnmh.el
+++ b/lisp/gnus/nnmh.el
@@ -578,4 +578,5 @@ as unread by Gnus.")
 
 (provide 'nnmh)
 
+;;; arch-tag: 36c12a98-3bad-44b3-9953-628078ef0e04
 ;;; nnmh.el ends here

diff --git a/lisp/gnus/nnml.el b/lisp/gnus/nnml.el
index ad7d040560a7c3d0c4429fea36ec2c533e9a6be2..90902f31aac0141740efc7a41335d5ea61cb33c4 100644 (file)
--- a/lisp/gnus/nnml.el
+++ b/lisp/gnus/nnml.el
@@ -827,4 +827,5 @@ all.  This may very well take some time.")
 
 (provide 'nnml)
 
+;;; arch-tag: 52c97dc3-9735-45de-b439-9e4d23b52004
 ;;; nnml.el ends here

diff --git a/lisp/gnus/nnoo.el b/lisp/gnus/nnoo.el
index 272a247e22192c64df59dd96e940c585587d0e5d..f2baa64267bb1c4d48302c83dfa32a7b605f1998 100644 (file)
--- a/lisp/gnus/nnoo.el
+++ b/lisp/gnus/nnoo.el
@@ -306,4 +306,5 @@ All functions will return nil and report an error."
                                                     backend function))))))))
 (provide 'nnoo)
 
+;;; arch-tag: 0196b5ed-6f34-4778-a455-73a971f837e7
 ;;; nnoo.el ends here

diff --git a/lisp/gnus/nnslashdot.el b/lisp/gnus/nnslashdot.el
index 45a3db8737caff75d8c3879477e8589664d59b25..b2730e561f479bf0bebce95be7b2a344885404e5 100644 (file)
--- a/lisp/gnus/nnslashdot.el
+++ b/lisp/gnus/nnslashdot.el
@@ -509,4 +509,5 @@
 
 (provide 'nnslashdot)
 
+;;; arch-tag: aa73df7a-f7e6-4eef-bdea-5ce2f8c691b3
 ;;; nnslashdot.el ends here

diff --git a/lisp/gnus/nnsoup.el b/lisp/gnus/nnsoup.el
index eaa56aa934f585a73c599c01548be847c04d5572..2e877190ceaac9ab8732206d1e7cfd302e3c533f 100644 (file)
--- a/lisp/gnus/nnsoup.el
+++ b/lisp/gnus/nnsoup.el
@@ -814,4 +814,5 @@ backend for the messages.")
 
 (provide 'nnsoup)
 
+;;; arch-tag: b0451389-5703-4450-9425-f66f6b38c828
 ;;; nnsoup.el ends here

diff --git a/lisp/gnus/nnspool.el b/lisp/gnus/nnspool.el
index a21bb6482950dde14764685043759456380c6805..6a50fb787a7b1657e271aa8406f75d3585dfbd57 100644 (file)
--- a/lisp/gnus/nnspool.el
+++ b/lisp/gnus/nnspool.el
@@ -462,4 +462,5 @@ there.")
 
 (provide 'nnspool)
 
+;;; arch-tag: bdac8d27-2934-4eee-bad0-49e6b90c0d05
 ;;; nnspool.el ends here

diff --git a/lisp/gnus/nntp.el b/lisp/gnus/nntp.el
index de2299c77f7a98c63b4fc8e7039da4cff6fea42e..8791c652a45bac17b87f8ca99b86e94e3ed32d4a 100644 (file)
--- a/lisp/gnus/nntp.el
+++ b/lisp/gnus/nntp.el
@@ -1406,4 +1406,5 @@ password contained in '~/.nntp-authinfo'."
 
 (provide 'nntp)
 
+;;; arch-tag: 8655466a-b1b5-4929-9c45-7b1b2e767271
 ;;; nntp.el ends here

diff --git a/lisp/gnus/nnultimate.el b/lisp/gnus/nnultimate.el
index 5ce8446da11c4e92a4fc4d743f9435c64b6e6f22..4ab84e0b9835af94bb0620803ebcf162e163c0cf 100644 (file)
--- a/lisp/gnus/nnultimate.el
+++ b/lisp/gnus/nnultimate.el
@@ -477,4 +477,5 @@
 ;; coding: iso-8859-1
 ;; End:
 
+;;; arch-tag: ab6bfc45-8fe1-4647-9c78-41050eb152b8
 ;;; nnultimate.el ends here

diff --git a/lisp/gnus/nnvirtual.el b/lisp/gnus/nnvirtual.el
index 0b7091fec8ef9c070ca15499fb704bfbee885a4e..b8233dd95519018cd4d9d2fe3f8299adba3385ed 100644 (file)
--- a/lisp/gnus/nnvirtual.el
+++ b/lisp/gnus/nnvirtual.el
@@ -816,4 +816,5 @@ based on the marks on the component groups."
 
 (provide 'nnvirtual)
 
+;;; arch-tag: ca8c8ad9-1bd8-4b0f-9722-90dc645a45f5
 ;;; nnvirtual.el ends here

diff --git a/lisp/gnus/nnwarchive.el b/lisp/gnus/nnwarchive.el
index aae57a431f66c05a0dd8c695224d020e28396e09..00bcb79bb99e072d0bd1441db8b6258220022e76 100644 (file)
--- a/lisp/gnus/nnwarchive.el
+++ b/lisp/gnus/nnwarchive.el
@@ -749,4 +749,5 @@
 
 (provide 'nnwarchive)
 
+;;; arch-tag: 1ab7a15c-777a-40e0-95c0-0c41b3963578
 ;;; nnwarchive.el ends here

diff --git a/lisp/gnus/nnweb.el b/lisp/gnus/nnweb.el
index e62dec067e9886b36a3dd0b1e196cb519fb2c61a..cae4079845fa617818157d4fc6007f1c902f8eb9 100644 (file)
--- a/lisp/gnus/nnweb.el
+++ b/lisp/gnus/nnweb.el
@@ -994,4 +994,5 @@ If FOLLOW-REFRESH is non-nil, redirect refresh url in META."
 
 (provide 'nnweb)
 
+;;; arch-tag: f59307eb-c90f-479f-b7d2-dbd8bf51b697
 ;;; nnweb.el ends here

diff --git a/lisp/gnus/pop3.el b/lisp/gnus/pop3.el
index 479aa519976c84e85f33c013fc9447b2e84d8943..7bcfa962eb0fa021f91fc73bc338941593456760 100644 (file)
--- a/lisp/gnus/pop3.el
+++ b/lisp/gnus/pop3.el
@@ -514,4 +514,5 @@ and close the connection."
 
 (provide 'pop3)
 
+;;; arch-tag: 2facc142-1d74-498e-82af-4659b64cac12
 ;;; pop3.el ends here

diff --git a/lisp/gnus/qp.el b/lisp/gnus/qp.el
index 50ccf065226a44ea306bcce364eef15ff1de7811..febf827ef424819bc92b06ae7a8abd1cf93060b8 100644 (file)
--- a/lisp/gnus/qp.el
+++ b/lisp/gnus/qp.el
@@ -163,4 +163,5 @@ encode lines starting with \"From\"."
 
 (provide 'qp)
 
+;;; arch-tag: db89e52a-e4a1-4b69-926f-f434f04216ba
 ;;; qp.el ends here

diff --git a/lisp/gnus/rfc1843.el b/lisp/gnus/rfc1843.el
index e34957ac962c9e1115eacdafa608c921cd54f9f6..5c50ad2ef0733a4421c760fb8d228ace057460f6 100644 (file)
--- a/lisp/gnus/rfc1843.el
+++ b/lisp/gnus/rfc1843.el
@@ -181,4 +181,5 @@ ftp://ftp.math.psu.edu/pub/simpson/chinese/hzp/hzp.doc"
 
 (provide 'rfc1843)
 
+;;; arch-tag: 5149c301-a6ca-4731-9c9d-ba616e2cb687
 ;;; rfc1843.el ends here

diff --git a/lisp/gnus/rfc2045.el b/lisp/gnus/rfc2045.el
index bce3b8a55d9fd2952077e316ce179847fd23341f..3c57837265d2f7e11d6534e6af66e45ca49849a6 100644 (file)
--- a/lisp/gnus/rfc2045.el
+++ b/lisp/gnus/rfc2045.el
@@ -40,4 +40,5 @@
 
 (provide 'rfc2045)
 
+;;; arch-tag: 9ca54127-97bc-432c-b6e2-8c59cadba306
 ;;; rfc2045.el ends here

diff --git a/lisp/gnus/rfc2047.el b/lisp/gnus/rfc2047.el
index fbe10012182aabc58ab817a9c93bb7b4dbfedf80..7c93160c455b427716e4cfdaf6be64e9ec8c5b1a 100644 (file)
--- a/lisp/gnus/rfc2047.el
+++ b/lisp/gnus/rfc2047.el
@@ -591,4 +591,5 @@ If your Emacs implementation can't decode CHARSET, return nil."
 
 (provide 'rfc2047)
 
+;;; arch-tag: a07fe3d4-22b5-4c4a-bd89-b1f82d5d36f6
 ;;; rfc2047.el ends here

diff --git a/lisp/gnus/rfc2104.el b/lisp/gnus/rfc2104.el
index 916eea4367d83cce581df4f766d534295c6c365f..1ab7c80a04661f35a33b64eb2881d9adf67e3841 100644 (file)
--- a/lisp/gnus/rfc2104.el
+++ b/lisp/gnus/rfc2104.el
@@ -118,4 +118,5 @@
 
 (provide 'rfc2104)
 
+;;; arch-tag: cf671d5c-a45f-4a09-815e-704e59e43950
 ;;; rfc2104.el ends here

diff --git a/lisp/gnus/rfc2231.el b/lisp/gnus/rfc2231.el
index 3b3345f40b21f6989b665330bbb072295f5febcd..36c858418627378db508f6ae6bac7612cc42758b 100644 (file)
--- a/lisp/gnus/rfc2231.el
+++ b/lisp/gnus/rfc2231.el
@@ -206,4 +206,5 @@ These look like \"us-ascii'en-us'This%20is%20%2A%2A%2Afun%2A%2A%2A\"."
 
 (provide 'rfc2231)
 
+;;; arch-tag: c3ab751d-d108-406a-b301-68882ad8cd63
 ;;; rfc2231.el ends here

diff --git a/lisp/gnus/score-mode.el b/lisp/gnus/score-mode.el
index cfc5cc3c624d3dbe1d3145cd27250268f11724dc..da6c447d1155f7d9e1dd70648aeb65e6b60ed876 100644 (file)
--- a/lisp/gnus/score-mode.el
+++ b/lisp/gnus/score-mode.el
@@ -112,4 +112,5 @@ This mode is an extended emacs-lisp mode.
 
 (provide 'score-mode)
 
+;;; arch-tag: a74a416b-2505-4ad4-bc4e-a418c96b8845
 ;;; score-mode.el ends here

diff --git a/lisp/gnus/smiley-ems.el b/lisp/gnus/smiley-ems.el
index 6ded76685f7d701fc256af4a7e1f30c98fd2daef..7fce284e500ee8b7ae70c32122da29fd30326100 100644 (file)
--- a/lisp/gnus/smiley-ems.el
+++ b/lisp/gnus/smiley-ems.el
@@ -162,4 +162,5 @@ With arg, turn displaying on if and only if arg is positive."
 
 (provide 'smiley)
 
+;;; arch-tag: e726728a-14fb-4e6a-9aef-889941bdf7ad
 ;;; smiley-ems.el ends here

diff --git a/lisp/gnus/starttls.el b/lisp/gnus/starttls.el
index d0fb68263e9b8d0fd3805c85a5bfc091433af483..0fd14cead55fca748c4ce2baadb670b945644d99 100644 (file)
--- a/lisp/gnus/starttls.el
+++ b/lisp/gnus/starttls.el
@@ -74,4 +74,5 @@ specifying a port number to connect to."
 
 (provide 'starttls)
 
+;;; arch-tag: 648b3bd8-63bd-47f5-904c-7c819aea2297
 ;;; starttls.el ends here

diff --git a/lisp/gnus/utf7.el b/lisp/gnus/utf7.el
index 2a5e75270690c84b3c182d163927ad2224cc72d6..8f81d787fdb92b6ba96b83f063a82909632dc3e2 100644 (file)
--- a/lisp/gnus/utf7.el
+++ b/lisp/gnus/utf7.el
@@ -177,4 +177,5 @@ Characters are in raw byte pairs in narrowed buffer."
 
 (provide 'utf7)
 
+;;; arch-tag: 96078b55-85c7-4161-aed2-932c24b282c7
 ;;; utf7.el ends here

diff --git a/lisp/gnus/uudecode.el b/lisp/gnus/uudecode.el
index 18f04c2053ea72570f1f8b85708be1fd89ddc9ac..3e92cbcb832d5f0f4832bf0e85db24f8f9832bc8 100644 (file)
--- a/lisp/gnus/uudecode.el
+++ b/lisp/gnus/uudecode.el
@@ -214,4 +214,5 @@ If FILE-NAME is non-nil, save the result to FILE-NAME."
 
 (provide 'uudecode)
 
+;;; arch-tag: e1f09ed5-62b4-4677-9f13-4e81c4fe8ce3
 ;;; uudecode.el ends here

diff --git a/lisp/gnus/webmail.el b/lisp/gnus/webmail.el
index 32d89fc921b8ea626f73f5b5bbca7a0ca2c389a6..981e8e367fe716e7221eba0015945bd2c3f4c792 100644 (file)
--- a/lisp/gnus/webmail.el
+++ b/lisp/gnus/webmail.el
@@ -1191,4 +1191,5 @@
 
 (provide 'webmail)
 
+;;; arch-tag: f75a4558-a8f6-46ec-b1c3-7a6434b3dd71
 ;;; webmail.el ends here