From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 22 Jan 2005 10:36:05 +0000 (+0000)
Subject: (top level): Call (message "") via progn, so that
X-Git-Tag: ttn-vms-21-2-B4~2632
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1da1887d4c4c84159b90cca89a5b5cf8f59e0c98;p=emacs.git

(top level): Call (message "") via progn, so that
eudc-options-file is loaded.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 62a2b85bb81..2fb1794a812 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-01-22  Toby Allsopp  <Toby.Allsopp@navman.com>  (tiny change)
+
+	* net/eudc.el (top level): Call (message "") via progn, so that
+	eudc-options-file is loaded.
+
 2005-01-22  Kim F. Storm  <storm@cua.dk>
 
 	* simple.el (line-move-1): Rename from line-move.
diff --git a/lisp/net/eudc.el b/lisp/net/eudc.el
index bcdd1d195bf..2e6b1625146 100644
--- a/lisp/net/eudc.el
+++ b/lisp/net/eudc.el
@@ -1214,7 +1214,7 @@ queries the server for the existing fields and displays a corresponding form."
 ;;; Load the options file
 (if (and (not noninteractive)
 	 (and (locate-library eudc-options-file)
-	      (message ""))		; Remove modeline message
+	      (progn (message "") t))   ; Remove modeline message
 	 (not (featurep 'eudc-options-file)))
     (load eudc-options-file))