Commit 8778eb5e authored by Juri Linkov's avatar Juri Linkov

* lisp/dired-aux.el (dired-compress-file): Don't use string-match-p

because its match data is used afterwards.
parent 929c0500
2014-03-29 Juri Linkov <juri@jurta.org>
* dired-aux.el (dired-compress-file): Don't use string-match-p
because its match data is used afterwards.
2014-03-28 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/package.el (package-built-in-p): Treat a min-version of
......
......@@ -887,7 +887,7 @@ Otherwise, the rule is a compression rule, and compression is done with gzip.")
;; See if any suffix rule matches this file name.
(while suffixes
(let (case-fold-search)
(if (string-match-p (car (car suffixes)) file)
(if (string-match (car (car suffixes)) file)
(setq suffix (car suffixes) suffixes nil))
(setq suffixes (cdr suffixes))))
;; If so, compute desired new name.
......
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