diff options
| author | Julien Danjou | 2010-09-25 13:28:07 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka | 2010-09-25 13:28:07 +0000 |
| commit | a41db1075d18d0a49c1cd02e6120b23926cbd203 (patch) | |
| tree | a137efbb7cf1161cc4d25cadeda4188f92b6abe3 | |
| parent | 2452438f0cc613f65a944d7043fa6abe32ec17a0 (diff) | |
| download | emacs-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/ChangeLog | 25 | ||||
| -rw-r--r-- | lisp/gnus/gnus-bookmark.el | 3 | ||||
| -rw-r--r-- | lisp/gnus/gnus-group.el | 4 | ||||
| -rw-r--r-- | lisp/gnus/gnus-picon.el | 1 | ||||
| -rw-r--r-- | lisp/gnus/gnus-sum.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/gnus-uu.el | 1 | ||||
| -rw-r--r-- | lisp/gnus/gnus.el | 5 | ||||
| -rw-r--r-- | lisp/gnus/mml1991.el | 3 | ||||
| -rw-r--r-- | lisp/gnus/mml2015.el | 3 | ||||
| -rw-r--r-- | lisp/gnus/nnheader.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/rfc1843.el | 1 |
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 @@ | |||
| 1 | 2010-09-25 Julien Danjou <julien@danjou.info> | 1 | 2010-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. |
| 157 | You should never need to change this.") | 157 | You 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. |
| 164 | The format of the alist is | 161 | The 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. |
| 2229 | Same as `gnus-large-newsgroup', but only used for ephemeral newsgroups. | 2225 | Same 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. |
| 107 | List of pairs (KEY . GLYPH) where KEY is either a filename or an URL.") | 106 | List 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 | ||