Commit 4577244f authored by Glenn Morris's avatar Glenn Morris

(url-configuration-directory): Make it a defcustom.

parent cef98b13
......@@ -46,13 +46,16 @@
(require 'url-parse)
(require 'url-util)
;; Fixme: customize? convert-standard-filename?
(defvar url-configuration-directory
(cond
((file-directory-p "~/.url") "~/.url")
((file-directory-p user-emacs-directory)
(concat user-emacs-directory "url"))
(t "~/.url")))
;; FIXME convert-standard-filename?
(defcustom url-configuration-directory
(if (and (file-directory-p user-emacs-directory)
(not (file-directory-p "~/.url")))
(expand-file-name "url" user-emacs-directory)
"~/.url")
"Directory used by the URL package for cookies, history, etc."
:type 'directory
:group 'url)
(defun url-do-setup ()
"Setup the url package.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment