aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJulien Danjou2010-09-25 13:28:07 +0000
committerKatsumi Yamaoka2010-09-25 13:28:07 +0000
commita41db1075d18d0a49c1cd02e6120b23926cbd203 (patch)
treea137efbb7cf1161cc4d25cadeda4188f92b6abe3
parent2452438f0cc613f65a944d7043fa6abe32ec17a0 (diff)
downloademacs-a41db1075d18d0a49c1cd02e6120b23926cbd203.tar.gz
emacs-a41db1075d18d0a49c1cd02e6120b23926cbd203.zip
Merge changes made in Gnus trunk.
gnus-bookmark.el: Remove useless gnus-bookmark-after-jump-hook. gnus-group.el: Remove useless gnus-group-icon-cache. gnus-group.el: Remove useless gnus-ephemeral-group-server. gnus-picon.el: Remove useless gnus-picon-setup-p. gnus-sum.el: Remove useless gnus-newsgroup-none-id. gnus-uu.el: Remove gnus-uu-shar-file-name. gnus.el: Remove useless gnus-use-generic-from. gnus.el: Remove obsolete variable gnus-topic-indentation. mml1991.el: Remove useless mml1991-verbose. mml2015.el: Remove mc-default-scheme and mc-schemes useless variables. nnheader.el: Remove useless variables news-reply-yank-message-id and news-reply-yank-from. rfc1843.el: Remove useless rfc1843-old-gnus-decode-header-function variable.
-rw-r--r--lisp/gnus/ChangeLog25
-rw-r--r--lisp/gnus/gnus-bookmark.el3
-rw-r--r--lisp/gnus/gnus-group.el4
-rw-r--r--lisp/gnus/gnus-picon.el1
-rw-r--r--lisp/gnus/gnus-sum.el2
-rw-r--r--lisp/gnus/gnus-uu.el1
-rw-r--r--lisp/gnus/gnus.el5
-rw-r--r--lisp/gnus/mml1991.el3
-rw-r--r--lisp/gnus/mml2015.el3
-rw-r--r--lisp/gnus/nnheader.el2
-rw-r--r--lisp/gnus/rfc1843.el1
11 files changed, 25 insertions, 25 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 246fc048b0c..bbdceb51911 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,5 +1,30 @@
12010-09-25 Julien Danjou <julien@danjou.info> 12010-09-25 Julien Danjou <julien@danjou.info>
2 2
3 * rfc1843.el: Remove useless rfc1843-old-gnus-decode-header-function
4 variables.
5
6 * nnheader.el: Remove useless variables news-reply-yank-from and
7 news-reply-yank-message-id.
8
9 * mml2015.el: Remove useless mc-default-scheme and mc-schemes
10 variables.
11
12 * mml1991.el: Remove useless mml1991-verbose.
13
14 * gnus.el: Remove useless variable gnus-use-generic-from.
15 Remove obsolete variable gnus-topic-indentation.
16
17 * gnus-uu.el: Remove useless gnus-uu-shar-file-name.
18
19 * gnus-sum.el: Remove useless gnus-newsgroup-none-id.
20
21 * gnus-picon.el: Remove useless gnus-picon-setup-p variable.
22
23 * gnus-group.el: Remove useless gnus-group-icon-cache.
24 Remove useless gnus-ephemeral-group-server.
25
26 * gnus-bookmark.el: Remove useless gnus-bookmark-after-jump-hook.
27
3 * mml2015.el: Remove useless mml2015-verbose. 28 * mml2015.el: Remove useless mml2015-verbose.
4 29
5 * mml-smime.el: Remove useless mml-smime-verbose. 30 * mml-smime.el: Remove useless mml-smime-verbose.
diff --git a/lisp/gnus/gnus-bookmark.el b/lisp/gnus/gnus-bookmark.el
index aa3e2d70df0..137479b4e77 100644
--- a/lisp/gnus/gnus-bookmark.el
+++ b/lisp/gnus/gnus-bookmark.el
@@ -156,9 +156,6 @@ The default value is \(author subject date group annotation\)."
156 "The current version of the format used by bookmark files. 156 "The current version of the format used by bookmark files.
157You should never need to change this.") 157You should never need to change this.")
158 158
159(defvar gnus-bookmark-after-jump-hook nil
160 "Hook run after `gnus-bookmark-jump' jumps to a Gnus bookmark.")
161
162(defvar gnus-bookmark-alist () 159(defvar gnus-bookmark-alist ()
163 "Association list of Gnus bookmarks and their records. 160 "Association list of Gnus bookmarks and their records.
164The format of the alist is 161The format of the alist is
diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el
index 482d8e9231e..5a25d513a57 100644
--- a/lisp/gnus/gnus-group.el
+++ b/lisp/gnus/gnus-group.el
@@ -548,8 +548,6 @@ simple manner.")
548(defvar gnus-group-list-mode nil) 548(defvar gnus-group-list-mode nil)
549 549
550 550
551(defvar gnus-group-icon-cache nil)
552
553(defvar gnus-group-listed-groups nil) 551(defvar gnus-group-listed-groups nil)
554(defvar gnus-group-list-option nil) 552(defvar gnus-group-list-option nil)
555 553
@@ -2222,8 +2220,6 @@ Returns whether the fetching was successful or not."
2222 (other-frame 1)))) 2220 (other-frame 1))))
2223 (gnus-fetch-group group)) 2221 (gnus-fetch-group group))
2224 2222
2225(defvar gnus-ephemeral-group-server 0)
2226
2227(defcustom gnus-large-ephemeral-newsgroup 200 2223(defcustom gnus-large-ephemeral-newsgroup 200
2228 "The number of articles which indicates a large ephemeral newsgroup. 2224 "The number of articles which indicates a large ephemeral newsgroup.
2229Same as `gnus-large-newsgroup', but only used for ephemeral newsgroups. 2225Same as `gnus-large-newsgroup', but only used for ephemeral newsgroups.
diff --git a/lisp/gnus/gnus-picon.el b/lisp/gnus/gnus-picon.el
index d319fd3f768..fb23d9056ed 100644
--- a/lisp/gnus/gnus-picon.el
+++ b/lisp/gnus/gnus-picon.el
@@ -101,7 +101,6 @@ added right to the textual representation."
101 101
102;;; Internal variables: 102;;; Internal variables:
103 103
104(defvar gnus-picon-setup-p nil)
105(defvar gnus-picon-glyph-alist nil 104(defvar gnus-picon-glyph-alist nil
106 "Picon glyphs cache. 105 "Picon glyphs cache.
107List of pairs (KEY . GLYPH) where KEY is either a filename or an URL.") 106List of pairs (KEY . GLYPH) where KEY is either a filename or an URL.")
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index f019731d8b2..0af75829bd3 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -6216,8 +6216,6 @@ The resulting hash table is returned, or nil if no Xrefs were found."
6216 (unless (gnus-ephemeral-group-p group) 6216 (unless (gnus-ephemeral-group-p group)
6217 (gnus-group-update-group group t)))))) 6217 (gnus-group-update-group group t))))))
6218 6218
6219(defvar gnus-newsgroup-none-id 0)
6220
6221(defun gnus-get-newsgroup-headers (&optional dependencies force-new) 6219(defun gnus-get-newsgroup-headers (&optional dependencies force-new)
6222 (let ((cur nntp-server-buffer) 6220 (let ((cur nntp-server-buffer)
6223 (dependencies 6221 (dependencies
diff --git a/lisp/gnus/gnus-uu.el b/lisp/gnus/gnus-uu.el
index 614a52c176c..d4f382a0c29 100644
--- a/lisp/gnus/gnus-uu.el
+++ b/lisp/gnus/gnus-uu.el
@@ -335,7 +335,6 @@ didn't work, and overwrite existing files. Otherwise, ask each time."
335 335
336(defvar gnus-uu-shar-begin-string "^#! */bin/sh") 336(defvar gnus-uu-shar-begin-string "^#! */bin/sh")
337 337
338(defvar gnus-uu-shar-file-name nil)
339(defvar gnus-uu-shar-name-marker 338(defvar gnus-uu-shar-name-marker
340 "begin 0?[0-7][0-7][0-7][ \t]+\\(\\(\\w\\|[.\\:]\\)*\\b\\)") 339 "begin 0?[0-7][0-7][0-7][ \t]+\\(\\(\\w\\|[.\\:]\\)*\\b\\)")
341 340
diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el
index a9ab7ed97fb..2a5533db079 100644
--- a/lisp/gnus/gnus.el
+++ b/lisp/gnus/gnus.el
@@ -2621,9 +2621,6 @@ a string, be sure to use a valid format, see RFC 2616."
2621(defvar gnus-tree-buffer "*Tree*" 2621(defvar gnus-tree-buffer "*Tree*"
2622 "Buffer where Gnus thread trees are displayed.") 2622 "Buffer where Gnus thread trees are displayed.")
2623 2623
2624;; Dummy variable.
2625(defvar gnus-use-generic-from nil)
2626
2627;; Variable holding the user answers to all method prompts. 2624;; Variable holding the user answers to all method prompts.
2628(defvar gnus-method-history nil) 2625(defvar gnus-method-history nil)
2629 2626
@@ -2651,8 +2648,6 @@ a string, be sure to use a valid format, see RFC 2616."
2651 ,(nnheader-concat gnus-cache-directory "active")))) 2648 ,(nnheader-concat gnus-cache-directory "active"))))
2652 "List of predefined (convenience) servers.") 2649 "List of predefined (convenience) servers.")
2653 2650
2654(defvar gnus-topic-indentation "") ;; Obsolete variable.
2655
2656(defconst gnus-article-mark-lists 2651(defconst gnus-article-mark-lists
2657 '((marked . tick) (replied . reply) 2652 '((marked . tick) (replied . reply)
2658 (expirable . expire) (killed . killed) 2653 (expirable . expire) (killed . killed)
diff --git a/lisp/gnus/mml1991.el b/lisp/gnus/mml1991.el
index 8f9076cbc3f..b73162ff131 100644
--- a/lisp/gnus/mml1991.el
+++ b/lisp/gnus/mml1991.el
@@ -65,9 +65,6 @@
65 mml1991-epg-encrypt)) 65 mml1991-epg-encrypt))
66 "Alist of PGP functions.") 66 "Alist of PGP functions.")
67 67
68(defvar mml1991-verbose mml-secure-verbose
69 "If non-nil, ask the user about the current operation more verbosely.")
70
71(defvar mml1991-cache-passphrase mml-secure-cache-passphrase 68(defvar mml1991-cache-passphrase mml-secure-cache-passphrase
72 "If t, cache passphrase.") 69 "If t, cache passphrase.")
73 70
diff --git a/lisp/gnus/mml2015.el b/lisp/gnus/mml2015.el
index fb581086512..1002f24ea82 100644
--- a/lisp/gnus/mml2015.el
+++ b/lisp/gnus/mml2015.el
@@ -188,9 +188,6 @@ Whether the passphrase is cached at all is controlled by
188(autoload 'mc-cleanup-recipient-headers "mc-toplev") 188(autoload 'mc-cleanup-recipient-headers "mc-toplev")
189(autoload 'mc-sign-generic "mc-toplev") 189(autoload 'mc-sign-generic "mc-toplev")
190 190
191(defvar mc-default-scheme)
192(defvar mc-schemes)
193
194(defvar mml2015-decrypt-function 'mailcrypt-decrypt) 191(defvar mml2015-decrypt-function 'mailcrypt-decrypt)
195(defvar mml2015-verify-function 'mailcrypt-verify) 192(defvar mml2015-verify-function 'mailcrypt-verify)
196 193
diff --git a/lisp/gnus/nnheader.el b/lisp/gnus/nnheader.el
index 03014e540c6..9d22080cc75 100644
--- a/lisp/gnus/nnheader.el
+++ b/lisp/gnus/nnheader.el
@@ -570,8 +570,6 @@ the line could be found."
570 570
571(defvar nntp-server-buffer nil) 571(defvar nntp-server-buffer nil)
572(defvar nntp-process-response nil) 572(defvar nntp-process-response nil)
573(defvar news-reply-yank-from nil)
574(defvar news-reply-yank-message-id nil)
575 573
576(defvar nnheader-callback-function nil) 574(defvar nnheader-callback-function nil)
577 575
diff --git a/lisp/gnus/rfc1843.el b/lisp/gnus/rfc1843.el
index 9826455832b..e395ee54c3c 100644
--- a/lisp/gnus/rfc1843.el
+++ b/lisp/gnus/rfc1843.el
@@ -166,7 +166,6 @@ ftp://ftp.math.psu.edu/pub/simpson/chinese/hzp/hzp.doc"
166 (equal (car ctl) "text/plain")) 166 (equal (car ctl) "text/plain"))
167 (rfc1843-decode-region (point) (point-max)))))))) 167 (rfc1843-decode-region (point) (point-max))))))))
168 168
169(defvar rfc1843-old-gnus-decode-header-function nil)
170(defvar gnus-decode-header-methods) 169(defvar gnus-decode-header-methods)
171(defvar gnus-decode-encoded-word-methods) 170(defvar gnus-decode-encoded-word-methods)
172 171