[Emacs-diffs] /srv/bzr/emacs/trunk r104933: nndraft.el: Require gnus-group.

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 104933
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Mon 2011-07-04 06:40:46 +0000
message:
  nndraft.el: Require gnus-group.
   (nndraft-request-list): Declare.
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/nndraft.el

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2011-07-04 02:19:08 +0000
+++ b/lisp/gnus/ChangeLog       2011-07-04 06:40:46 +0000
@@ -1,5 +1,8 @@
 2011-07-04  Katsumi Yamaoka  <address@hidden>
 
+       * nndraft.el: Require gnus-group.
+       (nndraft-request-list): Declare.
+
        * nndraft.el (nndraft-update-unread-articles): Don't show group having
        no unread article unless it matches gnus-permanently-visible-groups.
 

=== modified file 'lisp/gnus/nndraft.el'
--- a/lisp/gnus/nndraft.el      2011-07-04 02:19:08 +0000
+++ b/lisp/gnus/nndraft.el      2011-07-04 06:40:46 +0000
@@ -24,14 +24,21 @@
 
 ;;; Code:
 
+;; For Emacs <22.2 and XEmacs.
+(eval-and-compile
+  (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
+
 (require 'nnheader)
 (require 'nnmail)
 (require 'gnus-start)
+(require 'gnus-group)
 (require 'nnmh)
 (require 'nnoo)
 (require 'mm-util)
 (eval-when-compile (require 'cl))
 
+(declare-function nndraft-request-list "nnmh" (&rest args))
+
 (nnoo-declare nndraft
   nnmh)