/[emacs]/emacs/lisp/gnus/nndb.el
ViewVC logotype

Diff of /emacs/lisp/gnus/nndb.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by miles, Fri Sep 10 21:36:15 2004 UTC revision 1.4 by miles, Tue May 17 04:57:28 2005 UTC
# Line 1  Line 1 
1  ;;; nndb.el --- nndb access for Gnus  ;;; nndb.el --- nndb access for Gnus
2    
3  ;; Copyright (C) 1997, 1998, 2000, 2003, 2004 Free Software Foundation, Inc.  ;; Copyright (C) 1997, 1998, 2000, 2003, 2004, 2005
4    ;;        Free Software Foundation, Inc.
5    
6  ;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>  ;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
7  ;;         Kai Grossjohann <grossjohann@ls6.informatik.uni-dortmund.de>  ;;         Kai Grossjohann <grossjohann@ls6.informatik.uni-dortmund.de>
# Line 50  Line 51 
51  ;;-  ;;-
52  ;; Register nndb with known select methods.  ;; Register nndb with known select methods.
53    
54  (gnus-declare-backend "nndb" 'mail 'respool 'address 'prompt-address)  (require 'gnus-start)
55    (unless (assoc "nndb" gnus-valid-select-methods)
56      (gnus-declare-backend "nndb" 'mail 'respool 'address 'prompt-address))
57    
58  ;;; Code:  ;;; Code:
59    
# Line 59  Line 62 
62  (require 'nntp)  (require 'nntp)
63  (eval-when-compile (require 'cl))  (eval-when-compile (require 'cl))
64    
 (eval-and-compile  
   (autoload 'news-setup "rnewspost")  
   (autoload 'news-reply-mode "rnewspost")  
   (autoload 'cancel-timer "timer")  
   (autoload 'telnet "telnet" nil t)  
   (autoload 'telnet-send-input "telnet" nil t)  
   (autoload 'gnus-declare-backend "gnus-start"))  
   
65  ;; Declare nndb as derived from nntp  ;; Declare nndb as derived from nntp
66    
67  (nnoo-declare nndb nntp)  (nnoo-declare nndb nntp)

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26