From: Kim F. Storm <storm@cua.dk>
Date: Sun, 1 May 2005 22:33:57 +0000 (+0000)
Subject: Fix check for CUA-mode if no init file.
X-Git-Tag: ttn-vms-21-2-B4~600
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1934f5299945dd37028d72c8e07f8d67e0237cb1;p=emacs.git

Fix check for CUA-mode if no init file.
---

diff --git a/lisp/emulation/cua-base.el b/lisp/emulation/cua-base.el
index 6aeb4bab5a2..6eb19b7377e 100644
--- a/lisp/emulation/cua-base.el
+++ b/lisp/emulation/cua-base.el
@@ -1397,10 +1397,12 @@ paste (in addition to the normal emacs bindings)."
 ;;;###autoload  '(error (concat "\n\n"
 ;;;###autoload  "CUA-mode is now part of the standard GNU Emacs distribution,\n"
 ;;;###autoload  "so you may now enable and customize CUA via the Options menu.\n\n"
-;;;###autoload  "Your " (file-name-nondirectory user-init-file) " loads an older version of CUA-mode which does\n"
+;;;###autoload  (if user-init-file (concat
+;;;###autoload  "Your " (file-name-nondirectory user-init-file)
+;;;###autoload  " loads an older version of CUA-mode which does\n"
 ;;;###autoload  "not work correctly with this version of GNU Emacs.\n"
 ;;;###autoload  "To correct this, remove the loading and customization of the\n"
-;;;###autoload  "old version from the " user-init-file " file.\n\n")))
+;;;###autoload  "old version from the " user-init-file " file.\n\n") ""))))
 
 (provide 'cua)