Mercurial > emacs

changeset 80775:681a8553e832

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(url-https-expand-file-name): Resolve directly to url-default-expander rather than via another alias. (url-default-expander): Autoload an autoload. (Bug#825).
author Glenn Morris <rgm@gnu.org>
date Sat, 30 Aug 2008 02:23:33 +0000
parents 99fcb7a012f0
children 12ac78dc674e
files lisp/url/url-http.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/url/url-http.el	Fri Aug 29 10:08:26 2008 +0000
+++ b/lisp/url/url-http.el	Sat Aug 30 02:23:33 2008 +0000
@@ -1361,8 +1361,9 @@
 (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