Mercurial > emacs
comparison lisp/gnus/gnus-setup.el @ 82951:0fde48feb604
Import Gnus 5.10 from the v5_10 branch of the Gnus repository.
| author | Andreas Schwab <schwab@suse.de> |
|---|---|
| date | Thu, 22 Jul 2004 16:45:51 +0000 |
| parents | 695cf19ef79e |
| children | 18a818a2ee7c cce1c0ee76ee |
comparison
equal
deleted
inserted
replaced
| 56503:8bbd2323fbf2 | 82951:0fde48feb604 |
|---|---|
| 1 ;;; gnus-setup.el --- initialization & setup for Gnus 5 | 1 ;;; gnus-setup.el --- Initialization & Setup for Gnus 5 |
| 2 | 2 |
| 3 ;; Copyright (C) 1995, 1996, 2000 Free Software Foundation, Inc. | 3 ;; Copyright (C) 1995, 1996, 2000, 2001 |
| 4 ;; Free Software Foundation, Inc. | |
| 4 | 5 |
| 5 ;; Author: Steven L. Baur <steve@miranova.com> | 6 ;; Author: Steven L. Baur <steve@miranova.com> |
| 6 ;; Keywords: news | 7 ;; Keywords: news |
| 7 | 8 |
| 8 ;; This file is part of GNU Emacs. | 9 ;; This file is part of GNU Emacs. |
| 87 (when (and (not gnus-use-installed-mailcrypt) | 88 (when (and (not gnus-use-installed-mailcrypt) |
| 88 (null (member gnus-mailcrypt-lisp-directory load-path))) | 89 (null (member gnus-mailcrypt-lisp-directory load-path))) |
| 89 (setq load-path (cons gnus-mailcrypt-lisp-directory load-path))) | 90 (setq load-path (cons gnus-mailcrypt-lisp-directory load-path))) |
| 90 (autoload 'mc-install-write-mode "mailcrypt" nil t) | 91 (autoload 'mc-install-write-mode "mailcrypt" nil t) |
| 91 (autoload 'mc-install-read-mode "mailcrypt" nil t) | 92 (autoload 'mc-install-read-mode "mailcrypt" nil t) |
| 92 (add-hook 'message-mode-hook 'mc-install-write-mode) | 93 ;;; (add-hook 'message-mode-hook 'mc-install-write-mode) |
| 93 (add-hook 'gnus-summary-mode-hook 'mc-install-read-mode) | 94 ;;; (add-hook 'gnus-summary-mode-hook 'mc-install-read-mode) |
| 94 (when gnus-use-mhe | 95 (when gnus-use-mhe |
| 95 (add-hook 'mh-folder-mode-hook 'mc-install-read-mode) | 96 (add-hook 'mh-folder-mode-hook 'mc-install-read-mode) |
| 96 (add-hook 'mh-letter-mode-hook 'mc-install-write-mode))) | 97 (add-hook 'mh-letter-mode-hook 'mc-install-write-mode))) |
| 97 | 98 |
| 98 ;;; BBDB by | 99 ;;; BBDB by |