/[emacs]/emacs/lisp/gnus/gnus-setup.el
ViewVC logotype

Diff of /emacs/lisp/gnus/gnus-setup.el

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

revision 1.7 by miles, Mon Sep 1 15:45:24 2003 UTC revision 1.8 by miles, Sat Sep 4 13:13:43 2004 UTC
# Line 1  Line 1 
1  ;;; gnus-setup.el --- initialization & setup for Gnus 5  ;;; gnus-setup.el --- Initialization & Setup for Gnus 5
2    
3  ;; Copyright (C) 1995, 1996, 2000 Free Software Foundation, Inc.  ;; Copyright (C) 1995, 1996, 2000, 2001
4    ;;        Free Software Foundation, Inc.
5    
6  ;; Author: Steven L. Baur <steve@miranova.com>  ;; Author: Steven L. Baur <steve@miranova.com>
7  ;; Keywords: news  ;; Keywords: news
# Line 89  Line 90 
90      (setq load-path (cons gnus-mailcrypt-lisp-directory load-path)))      (setq load-path (cons gnus-mailcrypt-lisp-directory load-path)))
91    (autoload 'mc-install-write-mode "mailcrypt" nil t)    (autoload 'mc-install-write-mode "mailcrypt" nil t)
92    (autoload 'mc-install-read-mode "mailcrypt" nil t)    (autoload 'mc-install-read-mode "mailcrypt" nil t)
93    (add-hook 'message-mode-hook 'mc-install-write-mode)  ;;;   (add-hook 'message-mode-hook 'mc-install-write-mode)
94    (add-hook 'gnus-summary-mode-hook 'mc-install-read-mode)  ;;;   (add-hook 'gnus-summary-mode-hook 'mc-install-read-mode)
95    (when gnus-use-mhe    (when gnus-use-mhe
96      (add-hook 'mh-folder-mode-hook 'mc-install-read-mode)      (add-hook 'mh-folder-mode-hook 'mc-install-read-mode)
97      (add-hook 'mh-letter-mode-hook 'mc-install-write-mode)))      (add-hook 'mh-letter-mode-hook 'mc-install-write-mode)))

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

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