Changeset 4161 for trunk/lisp/gnus/gnus-art.el

Timestamp:

2006年09月09日 16時30分10秒 (2 years ago)

Author:

miyoshi

Message:

Sync up with Emacs CVS HEAD.

Files:

• trunk/lisp/gnus/gnus-art.el (modified) (5 diffs)

trunk/lisp/gnus/gnus-art.el

@@ -853 +853 @@
-(defvar gnus-decode-header-function 'mail-decode-encoded-word-region
-  "Function used to decode headers.")
+
+(defvar gnus-decode-address-function 'mail-decode-encoded-address-region
+  "Function used to decode addresses.")
-
-(defvar gnus-article-dumbquotes-map
@@ -2378 +2381 @@
-                           (error))
-                         gnus-newsgroup-ignored-charsets))
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-
-(defun article-decode-group-name ()
@@ -3924 +3941 @@
-  (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."
@@ -4325 +4350 @@
-           (none "(none)")
-           (description
-
-
-
+
+
-           (filename
-            (or (mail-content-type-get (mm-handle-disposition data) 'filename)
@@ -6696 +6720 @@
-                               (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:
-