diff options
| author | Glenn Morris | 2011-07-05 19:45:24 -0700 |
|---|---|---|
| committer | Glenn Morris | 2011-07-05 19:45:24 -0700 |
| commit | 929ca92503a84dab4d5b83384efffe34f54ac23c (patch) | |
| tree | 09f53ea09469fa8dfbef80946536f026a1b5cce5 | |
| parent | 322b7dab59b98b5d8625d2cd29e48f1ce605f769 (diff) | |
| download | emacs-929ca92503a84dab4d5b83384efffe34f54ac23c.tar.gz emacs-929ca92503a84dab4d5b83384efffe34f54ac23c.zip | |
* gnus-group.el (gnus-read-ephemeral-emacs-bug-group): Silence compiler.
| -rw-r--r-- | lisp/gnus/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/gnus/gnus-group.el | 4 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index f8cc12b288f..6b3e10691d0 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2011-07-06 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * gnus-group.el (gnus-read-ephemeral-emacs-bug-group): Silence compiler. | ||
| 4 | |||
| 1 | 2011-07-05 Lars Magne Ingebrigtsen <larsi@gnus.org> | 5 | 2011-07-05 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 2 | 6 | ||
| 3 | * gnus.el (gnus-refer-article-method): Remove mention of nnspool, which | 7 | * gnus.el (gnus-refer-article-method): Remove mention of nnspool, which |
diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el index da6550c1680..da925700bd2 100644 --- a/lisp/gnus/gnus-group.el +++ b/lisp/gnus/gnus-group.el | |||
| @@ -2469,6 +2469,8 @@ the bug number, and browsing the URL must return mbox output." | |||
| 2469 | number | 2469 | number |
| 2470 | (cdr (assoc 'debian gnus-bug-group-download-format-alist)))) | 2470 | (cdr (assoc 'debian gnus-bug-group-download-format-alist)))) |
| 2471 | 2471 | ||
| 2472 | (defvar debbugs-bug-number) ; debbugs-gnu | ||
| 2473 | |||
| 2472 | (defun gnus-read-ephemeral-emacs-bug-group (ids &optional window-conf) | 2474 | (defun gnus-read-ephemeral-emacs-bug-group (ids &optional window-conf) |
| 2473 | "Browse Emacs bugs IDS as an ephemeral group." | 2475 | "Browse Emacs bugs IDS as an ephemeral group." |
| 2474 | (interactive (list (string-to-number | 2476 | (interactive (list (string-to-number |
| @@ -2480,7 +2482,7 @@ the bug number, and browsing the URL must return mbox output." | |||
| 2480 | ids | 2482 | ids |
| 2481 | (cdr (assoc 'emacs gnus-bug-group-download-format-alist)) | 2483 | (cdr (assoc 'emacs gnus-bug-group-download-format-alist)) |
| 2482 | window-conf) | 2484 | window-conf) |
| 2483 | (when (boundp 'debbugs-summary-mode) | 2485 | (when (fboundp 'debbugs-summary-mode) |
| 2484 | (with-current-buffer (window-buffer (selected-window)) | 2486 | (with-current-buffer (window-buffer (selected-window)) |
| 2485 | (debbugs-summary-mode 1) | 2487 | (debbugs-summary-mode 1) |
| 2486 | (set (make-local-variable 'debbugs-bug-number) (car ids))))) | 2488 | (set (make-local-variable 'debbugs-bug-number) (car ids))))) |