Mercurial > hg > xemacs-beta
diff lisp/hyperbole/hgnus.el @ 100:4be1180a9e89 r20-1b2
Import from CVS: tag r20-1b2
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:15:11 +0200 |
parents | 131b0175ea99 |
children |
line wrap: on
line diff
--- a/lisp/hyperbole/hgnus.el Mon Aug 13 09:13:58 2007 +0200 +++ b/lisp/hyperbole/hgnus.el Mon Aug 13 09:15:11 2007 +0200 @@ -6,15 +6,15 @@ ;; KEYWORDS: hypermedia, news ;; ;; AUTHOR: Bob Weiner -;; ORG: Brown U. +;; ORG: InfoDock Associates ;; ;; ORIG-DATE: 24-Dec-91 at 22:29:28 by Bob Weiner -;; LAST-MOD: 8-Aug-95 at 10:53:53 by Bob Weiner +;; LAST-MOD: 26-Jan-97 at 14:43:54 by Bob Weiner ;; ;; This file is part of Hyperbole. ;; Available for use and distribution under the same terms as GNU Emacs. ;; -;; Copyright (C) 1991-1995, Free Software Foundation, Inc. +;; Copyright (C) 1991-1996, Free Software Foundation, Inc. ;; Developed with support from Motorola Inc. ;; ;; DESCRIPTION: @@ -26,7 +26,7 @@ ;; Automatically configured for use in "hyperbole.el". ;; If hsite loading fails prior to initializing Hyperbole Gnus support, ;; -;; {M-x Gnus-init RTN} +;; {M-x Gnus-init RET} ;; ;; will do it. ;; @@ -42,8 +42,10 @@ (require 'hmail) (require 'hsmail) -;; This is not in Gnus 5.x -;(require 'gnuspost) +(cond ((or (featurep 'gnus-msg) + (featurep 'gnuspost))) + ((load "gnus-msg" t)) + (t (load "gnuspost" t))) ;;; ************************************************************************ ;;; Public variables