# HG changeset patch
# User Reiner Steib <Reiner.Steib@gmx.de>
# Date 1157535839 0
# Node ID afe113527b7143fa0c4b18cc70454d984d1fd8b4
# Parent  886b4823edf48ad75cdb5342d78f4787a84632ea
(gnus-button-regexp, gnus-button-marker-list)
(gnus-button-last): Move up.  Convert comments into doc strings.

diff -r 886b4823edf4 -r afe113527b71 lisp/gnus/ChangeLog
--- a/lisp/gnus/ChangeLog	Wed Sep 06 09:10:44 2006 +0000
+++ b/lisp/gnus/ChangeLog	Wed Sep 06 09:43:59 2006 +0000
@@ -1,3 +1,8 @@
+2006-09-06  Reiner Steib  <Reiner.Steib@gmx.de>
+
+	* gnus-art.el (gnus-button-regexp, gnus-button-marker-list)
+	(gnus-button-last): Move up.  Convert comments into doc strings.
+
 2006-09-04  Chong Yidong  <cyd@stupidchicken.com>
 
 	* message.el (message-send-mail-with-sendmail): Look for sendmail in
diff -r 886b4823edf4 -r afe113527b71 lisp/gnus/gnus-art.el
--- a/lisp/gnus/gnus-art.el	Wed Sep 06 09:10:44 2006 +0000
+++ b/lisp/gnus/gnus-art.el	Wed Sep 06 09:43:59 2006 +0000
@@ -3940,6 +3940,14 @@
   (mm-enable-multibyte)
   (gnus-run-mode-hooks 'gnus-article-mode-hook))
 
+;; Internal variables.  Are `gnus-button-regexp' and `gnus-button-last' used
+;; at all?
+(defvar gnus-button-regexp nil)
+(defvar gnus-button-marker-list nil
+  "Regexp matching any of the regexps from `gnus-button-alist'.")
+(defvar gnus-button-last nil
+  "The value of `gnus-button-alist' when `gnus-button-regexp' was build.")
+
 (defun gnus-article-setup-buffer ()
   "Initialize the article buffer."
   (let* ((name (if gnus-single-article-buffer "*Article*"
@@ -6711,13 +6719,6 @@
 			       :inline t
 			       (integer :tag "Regexp group")))))
 
-(defvar gnus-button-regexp nil)
-(defvar gnus-button-marker-list nil)
-;; Regexp matching any of the regexps from `gnus-button-alist'.
-
-(defvar gnus-button-last nil)
-;; The value of `gnus-button-alist' when `gnus-button-regexp' was build.
-
 ;;; Commands:
 
 (defun gnus-article-push-button (event)