(custom-theme-directory): Use user-emacs-directory.

63212d45 · Chong Yidong · 0e8a0445 · 63212d45
Commit 63212d45 authored Jun 13, 2007 by Chong Yidong
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 4 deletions

lisp/custom.el lisp/custom.el +1 -4

No files found.
--- a/lisp/custom.el
+++ b/lisp/custom.el
@@ -1009,10 +1009,7 @@ Every theme X has a property `provide-theme' whose value is \"X-theme\".
 ;;; Loading themes.

 (defcustom custom-theme-directory
-  (if (eq system-type 'ms-dos)
-	 ;; MS-DOS cannot have initial dot.
-	 "~/_emacs.d/"
-      "~/.emacs.d/")
+  user-emacs-directory
  "Directory in which Custom theme files should be written.
 `load-theme' searches this directory in addition to load-path.
 The command `customize-create-theme' writes the files it produces