From d8869c65a3c39770c53e0b3294f64424932d241f Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Wed, 13 Jun 2007 00:03:28 +0000 Subject: [PATCH] (user-emacs-directory): New defconst. --- lisp/subr.el | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/lisp/subr.el b/lisp/subr.el index a05c1d15780..7ce7071f2f7 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -2041,6 +2041,15 @@ On other systems, this variable is normally always nil.") (put 'cl-assertion-failed 'error-conditions '(error)) (put 'cl-assertion-failed 'error-message "Assertion failed") +(defconst user-emacs-directory + (if (eq system-type 'ms-dos) + ;; MS-DOS cannot have initial dot. + "~/_emacs.d/" + "~/.emacs.d/") + "Directory beneath which additional per-user Emacs-specific files are placed. +Various programs in Emacs store information in this directory. +Note that this should end with a directory separator.") + ;;;; Misc. useful functions. -- 2.39.5