[Emacs-diffs] Changes to emacs/lisp/subr.el,v

[Juanma Barranquero]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Juanma Barranquero <lektu>      08/10/28 11:35:16

Index: subr.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/subr.el,v
retrieving revision 1.616
retrieving revision 1.617
diff -u -b -r1.616 -r1.617
--- subr.el     25 Oct 2008 09:17:44 -0000      1.616
+++ subr.el     28 Oct 2008 11:35:11 -0000      1.617
@@ -2169,10 +2169,12 @@
          (at-home (and old-name (expand-file-name old-name home))))
      (if (and at-home (file-readable-p at-home))
         at-home
-       (unless (or purify-flag ;; don't create dir while dumping
-                  (file-accessible-directory-p
-                   (directory-file-name user-emacs-directory)))
-        (make-directory user-emacs-directory t)) ;; don't catch errors
+       ;; Make sure `user-emacs-directory' exists,
+       ;; unless we're in batch mode or dumping Emacs
+       (or noninteractive
+          purify-flag
+          (file-accessible-directory-p (directory-file-name 
user-emacs-directory))
+          (make-directory user-emacs-directory))
        (expand-file-name new-name user-emacs-directory)))))