From: Glenn Morris Date: Sat, 13 Oct 2012 20:17:16 +0000 (-0700) Subject: Comment X-Git-Tag: emacs-24.2.90~235^2~5 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3071811230cf9f6cd461a34cc7202565c4f9947a;p=emacs.git Comment --- diff --git a/lisp/url/url-file.el b/lisp/url/url-file.el index 3515d7493cc..59aaccbe074 100644 --- a/lisp/url/url-file.el +++ b/lisp/url/url-file.el @@ -166,6 +166,8 @@ to them." (or filename (error "File does not exist: %s" (url-recreate-url url))) ;; Need to figure out the content-type from the real extension, ;; not the compressed one. + ;; FIXME should this regexp not include more extensions; basically + ;; everything that url-file-find-possibly-compressed-file does? (setq uncompressed-filename (if (string-match "\\.\\(gz\\|Z\\|z\\)$" filename) (substring filename 0 (match-beginning 0)) filename))