diff lisp/menubar-items.el @ 2768:feeb145e30f4

[xemacs-hg @ 2005-05-10 17:35:57 by aidan] Warn that sendmail-user-agent sucks, on first use, but stick to using it.
author aidan
date Tue, 10 May 2005 17:36:05 +0000
parents 9caf26dd924f
children 0f411920c8db
line wrap: on
line diff
--- a/lisp/menubar-items.el	Tue May 10 17:21:54 2005 +0000
+++ b/lisp/menubar-items.el	Tue May 10 17:36:05 2005 +0000
@@ -886,7 +886,12 @@
 	:active (boundp 'ps-print-color-p)])
       ("%_Internet"
        ("%_Compose Mail With"
-	["Default Emacs Mailer"
+	["VM mail package"
+	 (customize-set-variable 'mail-user-agent 'vm-user-agent)
+	 :style radio
+	 :selected (eq mail-user-agent 'vm-user-agent)
+	 :active (get 'vm-user-agent 'composefunc)]
+	["Bare-bones Emacs Mailer"
 	 (customize-set-variable 'mail-user-agent 'sendmail-user-agent)
 	 :style radio
 	 :selected (eq mail-user-agent 'sendmail-user-agent)]