# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1130711288 0
# Node ID 624edd899d325aa1b37f4289caf97e96b6a82f56
# Parent  1b800330fe1f4bf3e2d19ab592a15747a593572b
	* thumbs.el (thumbs-thumbsdir): Default to ~/.emacs.d/thumbs.
	(thumbs-thumbsdir): Make .emacs.d if it does not exist.

diff -r 1b800330fe1f -r 624edd899d32 lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Oct 30 22:16:46 2005 +0000
+++ b/lisp/ChangeLog	Sun Oct 30 22:28:08 2005 +0000
@@ -1,3 +1,8 @@
+2005-10-30  Chong Yidong  <cyd@stupidchicken.com>
+
+	* thumbs.el (thumbs-thumbsdir): Default to ~/.emacs.d/thumbs.
+	(thumbs-thumbsdir): Make .emacs.d if it does not exist.
+
 2005-10-30  Michael Albinus  <michael.albinus@gmx.de>
 
 	* net/tramp.el (tramp-chunksize): Escape parentheses in docstring
diff -r 1b800330fe1f -r 624edd899d32 lisp/thumbs.el
--- a/lisp/thumbs.el	Sun Oct 30 22:16:46 2005 +0000
+++ b/lisp/thumbs.el	Sun Oct 30 22:28:08 2005 +0000
@@ -65,7 +65,7 @@
   :version "22.1"
   :group 'multimedia)
 
-(defcustom thumbs-thumbsdir "~/.emacs-thumbs"
+(defcustom thumbs-thumbsdir "~/.emacs.d/thumbs"
   "*Directory to store thumbnails."
   :type 'directory
   :group 'thumbs)
@@ -190,7 +190,7 @@
   (let ((thumbs-thumbsdir (file-name-as-directory
                            (expand-file-name thumbs-thumbsdir))))
     (unless (file-directory-p thumbs-thumbsdir)
-      (make-directory thumbs-thumbsdir)
+      (make-directory thumbs-thumbsdir t)
       (message "Creating thumbnails directory"))
     thumbs-thumbsdir))