;ELC ;;; Compiled by pot@pot.cnuce.cnr.it on Tue Mar 18 15:43:47 2003 ;;; from file /home/pot/gnu/emacs-pretest.new/lisp/gnus/gnus-setup.el ;;; in Emacs version 21.3 ;;; with bytecomp version 2.85.4.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19.29"))) (error "`gnus-setup.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@44 *If non-nil use installed version of Gnus. (defvar gnus-use-installed-gnus t (#$ . -627)) #@49 *If non-nil use installed version of mailcrypt. (defvar gnus-use-installed-mailcrypt (featurep 'xemacs) (#$ . -723)) #@45 Directory where Emacs site lisp is located. (defvar gnus-emacs-lisp-directory (byte-code "\300\301!\203\302\207\303\207" [featurep xemacs "/usr/local/lib/xemacs/" "/usr/local/share/emacs/"] 2) (#$ . 846)) #@43 Directory where Gnus Emacs lisp is found. (defvar gnus-gnus-lisp-directory (concat gnus-emacs-lisp-directory "gnus/lisp/") (#$ . 1059)) #@48 Directory where Mailcrypt Emacs Lisp is found. (defvar gnus-mailcrypt-lisp-directory (concat gnus-emacs-lisp-directory "site-lisp/mailcrypt/") (#$ . 1201)) #@48 Directory where Big Brother Database is found. (defvar gnus-bbdb-lisp-directory (concat gnus-emacs-lisp-directory "site-lisp/bbdb/") (#$ . 1363)) #@52 Set this if you want to use MH-E for mail reading. (defvar gnus-use-mhe nil (#$ . 1515)) #@53 Set this if you want to use RMAIL for mail reading. (defvar gnus-use-rmail nil (#$ . 1610)) #@56 Set this if you want to use SENDMAIL for mail reading. (defvar gnus-use-sendmail t (#$ . 1708)) #@62 Set this if you want to use the VM package for mail reading. (defvar gnus-use-vm nil (#$ . 1810)) #@40 Set this if you want to use Supercite. (defvar gnus-use-sc nil (#$ . 1914)) #@70 Set this if you want to use Mailcrypt for dealing with PGP messages. (defvar gnus-use-mailcrypt t (#$ . 1996)) #@55 Set this if you want to use the Big Brother DataBase. (defvar gnus-use-bbdb nil (#$ . 2113)) (byte-code "\204 \n\235\204 \nB\306\307!\210 \203K\f\204$ \n\235\204$ \nB\310\311\312\313\314$\210\310\315\312\313\314$\210\316\317\311\"\210\316\320\315\"\210@\203K\316\321\315\"\210\316\322\311\"\210A\203\317B\n\235\204\\B\nB\310\323\324\325\314$\210\310\326\324\325\314$\210\310\327\324\325\314$\210\310\330\324\325\314$\210\310\331\324\325\314$\210C\203\213\310\332\333\334\314$\210D\203\234\310\335\336\337\314$\210\316\340\335\"\210@\203\255\310\341\342\343\314$\210\316\321\341\"\210\310\344\345\346\314$\210\316\347\344\"\210E\203\317\310\350\351\325\314$\210\316\352\350\"\210\316\353\350\"\210F\203\341\316\354\355\"\210\355G\310\355\356\"\210\357\360!\204.\310\361\362\363\314\313%\210\310\364\362\365\314\313%\210\310\366\362\367\314\313%\210\310\360\362\370\314\313%\210\310\371\372\373\314\313%\210\310\374\375\376\314\313%\210\377\201H\201I\"\210\310\201I\201J\201K\314\313%\210\201L\201M!\210\201N\201O!\207" [gnus-use-installed-gnus gnus-gnus-lisp-directory load-path gnus-use-mailcrypt gnus-use-installed-mailcrypt gnus-mailcrypt-lisp-directory require message autoload mc-install-write-mode "mailcrypt" nil t mc-install-read-mode add-hook message-mode-hook gnus-summary-mode-hook mh-folder-mode-hook mh-letter-mode-hook bbdb "bbdb-com" "Insidious Big Brother Database" bbdb-name bbdb-company bbdb-net bbdb-notes bbdb-insinuate-vm "bbdb-vm" "Hook BBDB into VM" bbdb-insinuate-rmail "bbdb-rmail" "Hook BBDB into RMAIL" rmail-mode-hook bbdb-insinuate-mh "bbdb-mh" "Hook BBDB into MH-E" bbdb-insinuate-gnus "bbdb-gnus" "Hook BBDB into Gnus" gnus-startup-hook bbdb-insinuate-sendmail "bbdb" mail-setup-hook message-setup-hook mail-citation-hook sc-cite-original "supercite" fboundp gnus gnus-slave-no-server "gnus" "Read network news as a slave without connecting to local server." gnus-no-server "Read network news.\nIf ARG is a positive number, Gnus will use that as the\nstartup level. If ARG is nil, Gnus will be started at level 2.\nIf ARG is non-nil and not a positive number, Gnus will\nprompt the user for the name of an NNTP server to use.\nAs opposed to `gnus', this command will not connect to the local server." gnus-slave "Read news as a slave." "Read network news.\nIf ARG is non-nil and a positive number, Gnus will use that as the\nstartup level. If ARG is non-nil and not a positive number, Gnus will\nprompt the user for the name of an NNTP server to use." gnus-update-format "gnus-spec" "Update the format specification near point." gnus-fetch-group "gnus-group" "Start Gnus if necessary and enter GROUP.\nReturns whether the fetching was successful or not." defalias gnus-use-mhe gnus-use-bbdb gnus-bbdb-lisp-directory gnus-use-vm gnus-use-rmail gnus-use-sendmail gnus-use-sc message-cite-function gnus-batch-kill gnus-batch-score "gnus-kill" "Run batched scoring.\nUsage: emacs -batch -l gnus -f gnus-batch-score ...\nNewsgroups is a list of strings in Bnews format. If you want to score\nthe comp hierarchy, you'd say \"comp.all\". If you would not like to\nscore the alt hierarchy, you'd say \"!alt.all\"." provide gnus-setup run-hooks gnus-setup-load-hook] 6)