(fset 'yes-or-no-p 'y-or-n-p)
(cw/requiring-package (mailcrypt)
- (mc-setversion "gpg")
- (autoload 'mc-install-write-mode "mailcrypt" nil t)
- (autoload 'mc-install-read-mode "mailcrypt" nil t)
- (add-hook 'mail-mode-hook 'mc-install-write-mode)
- (add-hook 'mail-setup-hook 'mc-install-write-mode)
- (add-hook 'gnus-summary-mode-hook 'mc-install-read-mode)
- (add-hook 'news-reply-mode-hook 'mc-install-write-mode)
- (setq mc-temp-directory (expand-file-name "~/tmp")
- mc-encrypt-for-me t
- mc-gpg-user-id "tfheen@opera.no"
- mc-passwd-timeout 600))
+ (cw/not-for-host ".*ntnu.no"
+ (mc-setversion "gpg") )
+ (autoload 'mc-install-write-mode "mailcrypt" nil t)
+ (autoload 'mc-install-read-mode "mailcrypt" nil t)
+ (add-hook 'mail-mode-hook 'mc-install-write-mode)
+ (add-hook 'mail-setup-hook 'mc-install-write-mode)
+ (add-hook 'gnus-summary-mode-hook 'mc-install-read-mode)
+ (add-hook 'news-reply-mode-hook 'mc-install-write-mode)
+ (setq mc-temp-directory (expand-file-name "~/tmp")
+ mc-encrypt-for-me t
+ mc-gpg-user-id "tfheen@opera.no"
+ mc-passwd-timeout 600))
(global-set-key "\M-n" 'browse-url-at-point)
(global-set-key [(control backspace)] 'undo)