From: Glenn Morris Date: Sat, 30 Aug 2008 02:24:00 +0000 (+0000) Subject: (url-https-expand-file-name): Resolve directly to url-default-expander X-Git-Tag: emacs-pretest-22.2.92~9 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cbd5b3d95ecd6ef2e955911c913856824aaa7639;p=emacs.git (url-https-expand-file-name): Resolve directly to url-default-expander rather than via another alias. (url-default-expander): Autoload an autoload. (Bug#825). --- diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog index 8eeb9c89537..ae12c685dcc 100644 --- a/lisp/url/ChangeLog +++ b/lisp/url/ChangeLog @@ -1,3 +1,9 @@ +2008-08-30 Glenn Morris + + * url-http.el (url-https-expand-file-name): Resolve directly to + url-default-expander rather than via another alias. + (url-default-expander): Autoload an autoload. (Bug#825). + 2008-04-04 Magnus Henoch * url-http.el (url-http-chunked-encoding-after-change-function): diff --git a/lisp/url/url-http.el b/lisp/url/url-http.el index 98060461f3d..326d7fc35db 100644 --- a/lisp/url/url-http.el +++ b/lisp/url/url-http.el @@ -1361,8 +1361,9 @@ p3p (defconst url-https-default-port 443 "Default HTTPS port.") ;;;###autoload (defconst url-https-asynchronous-p t "HTTPS retrievals are asynchronous.") +;;;###autoload (autoload 'url-default-expander "url-expand") ;;;###autoload -(defalias 'url-https-expand-file-name 'url-http-expand-file-name) +(defalias 'url-https-expand-file-name 'url-default-expander) (defmacro url-https-create-secure-wrapper (method args) `(defun ,(intern (format (if method "url-https-%s" "url-https") method)) ,args