
(setq load-path (cons "/afs/sipb.mit.edu/contrib/emacs/elisp19/gnus5"
		      load-path))
(fmakunbound 'gnus) ;; if GNUS is dumped into Emacs we're probably screwed anyways though.


;; These are supposed to be set in site-init.el but just to be paranoid.
(defvar news-inews-program "/afs/sipb.mit.edu/project/sipb/bin/inews")
(defvar gnus-default-nntp-server "news.mit.edu")
;; some people don't edit paths.el and leave the silly default of ""
(if (equal gnus-default-nntp-server "")
    (setq  gnus-default-nntp-server "news.mit.edu"))
(defvar gnus-local-domain "mit.edu")
;; some people don't edit paths.el and leave the default of nil
(if gnus-local-domain nil
  (setq gnus-local-domain "mit.edu"))
(defvar gnus-local-organization "Massachusetts Institute of Technology")

(defvar nnmail-crosspost-link-function 'copy-file
  "Function called to create a copy of a file.
This is `add-name-to-file' by default, which means that crossposts
will use hard links.  If your file system doesn't allow hard
links, you could set this variable to `copy-file' instead.

LOCAL: On Athena using AFS you have to use copy-file.
       Since AFS doesn't support symlinks accros directories.
       -- Greg
")
(defvar gnus-use-long-file-name t
  "*Non-nil means that the default name of a file to save articles in is the group name.
If it's nil, the directory form of the group name is used instead.

If this variable is a list, and the list contains the element
`not-score', long file names will not be used for score files; if it
contains the element `not-save', long file names will not be used for
saving; and if it contains the element `not-kill', long file names
will not be used for kill files.

LOCAL: Various Athena machines would have different default values of this variable
       so I've set it to t. -- Greg
")

;(defvar gnus-backup-default-subscribed-newsgroups
;  '("news.announce.newusers" "news.groups.questions" "gnu.emacs.gnus")
;  "Default default new newsgroups the first time Gnus is run.
;Should be set in paths.el, and shouldn't be touched by the user.

;;;
;; I've used 
;; $ cd /afs/sipb.mit.edu/contrib/emacs/packages/sgnus-0.26/lisp
;; $ emacs -batch -f batch-update-autoloads *.el 
;; to generate the loaddefs file
(defvar mail-signature-file nil) ;; XXX i should report this bug to Lars
(load "/afs/sipb.mit.edu/contrib/emacs/elisp19/gnus5/loaddefs.el")


;;; this will screw up the INFOPATH handling, but I don't see a reasonable better way
(defvar Info-directory-list Info-default-directory-list)
(setq Info-directory-list 
      (cons "/afs/sipb.mit.edu/contrib/emacs/packages/gnus5/texi/"
	    Info-directory-list))

(message 
"Welcome to September Gnus; consider adding yourself to the ding-users mail list.")
