From 1934f5299945dd37028d72c8e07f8d67e0237cb1 Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Sun, 1 May 2005 22:33:57 +0000 Subject: [PATCH] Fix check for CUA-mode if no init file. --- lisp/emulation/cua-base.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) 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) -- 2.39.2