Mercurial > hg > xemacs-beta

diff lisp/modes/sendmail.el @ 42:8b8b7f3559a2 r19-15b104

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b104
author cvs
date Mon, 13 Aug 2007 08:54:51 +0200
parents 1a767b41a199
children 56c54cf7c5b6
line wrap: on
line diff
--- a/lisp/modes/sendmail.el	Mon Aug 13 08:54:26 2007 +0200
+++ b/lisp/modes/sendmail.el	Mon Aug 13 08:54:51 2007 +0200
@@ -312,12 +312,13 @@
 	(put 'user-mail-address 'saved-value
 	     (list user-mail-address))
 	(put 'query-user-mail-address 'saved-value '(nil))
-	(custom-save-all)))
-    (if user-mail-address
-	user-mail-address
-      (setq user-mail-address (concat (user-login-name) "@"
-				      (or mail-host-address
-					  (system-name)))))))
+        (require 'cus-edit)
+	(custom-save-all))))
+  (if user-mail-address
+      user-mail-address
+    (setq user-mail-address (concat (user-login-name) "@"
+                                    (or mail-host-address
+                                        (system-name))))))
 
 (defun mail-setup (to subject in-reply-to cc replybuffer actions)
   (or mail-default-reply-to