changeset 67722:3a3904075d3d

(url-configuration-directory): Use ~/.emacs.d if possible.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 21 Dec 2005 20:04:41 +0000
parents d372bc6eff1d
children f0ddbd3730d3
files lisp/url/url.el
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/url/url.el	Wed Dec 21 20:02:20 2005 +0000
+++ b/lisp/url/url.el	Wed Dec 21 20:04:41 2005 +0000
@@ -48,7 +48,11 @@
 
 ;; Fixme: customize? convert-standard-filename?
 ;;;###autoload
-(defvar url-configuration-directory "~/.url")
+(defvar url-configuration-directory
+  (cond
+   ((file-directory-p "~/.url") "~/.url")
+   ((file-directory-p "~/.emacs.d") "~/.emacs.d/url")
+   (t "~/.url")))
 
 (defun url-do-setup ()
   "Setup the url package.