diff options
| author | Andrea Corallo <akrl@sdf.org> | 2021-01-30 14:09:37 +0100 |
|---|---|---|
| committer | Andrea Corallo <akrl@sdf.org> | 2021-01-30 14:09:37 +0100 |
| commit | a8b8d220b4fccaa812e85f9b2b3715593dc285ac (patch) | |
| tree | 07051469f09277b1993eee37870059e3d0abf71e /lisp/url/url-file.el | |
| parent | b8d3ae78c54db7c7bb65d367a80f9be3d8744c48 (diff) | |
| parent | ed2f2cc5577d5d9b61db7a5b61e93e79d678be41 (diff) | |
| download | emacs-a8b8d220b4fccaa812e85f9b2b3715593dc285ac.tar.gz emacs-a8b8d220b4fccaa812e85f9b2b3715593dc285ac.tar.bz2 emacs-a8b8d220b4fccaa812e85f9b2b3715593dc285ac.zip | |
Merge remote-tracking branch 'savannah/master' into native-comp
Diffstat (limited to 'lisp/url/url-file.el')
| -rw-r--r-- | lisp/url/url-file.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/url/url-file.el b/lisp/url/url-file.el index 52a9588030e..0e2ab5544b9 100644 --- a/lisp/url/url-file.el +++ b/lisp/url/url-file.el @@ -154,7 +154,7 @@ to them." ;; 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) + (setq uncompressed-filename (if (string-match "\\.\\(gz\\|Z\\|z\\)\\'" filename) (substring filename 0 (match-beginning 0)) filename)) (setq content-type (mailcap-extension-to-mime |