diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2010-07-10 14:52:53 -0400 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2010-07-10 14:52:53 -0400 |
commit | 2ec1b5ee3464999a18b8197101e8bf08a3c564a8 (patch) | |
tree | 4837c369ac576fbfd063b1ff046a3daca372f082 /lisp/arc-mode.el | |
parent | c971758df75640c55e6f9d7ac7d9c6909519d0b4 (diff) | |
parent | 7c33a0572280bdcf0583c5625cfda32f63fad56d (diff) | |
download | emacs-2ec1b5ee3464999a18b8197101e8bf08a3c564a8.tar.gz |
Merge changes from emacs-23 branch.
Diffstat (limited to 'lisp/arc-mode.el')
-rw-r--r-- | lisp/arc-mode.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el index fb6155dfd41..6dda7b2e40b 100644 --- a/lisp/arc-mode.el +++ b/lisp/arc-mode.el @@ -1811,10 +1811,13 @@ This doesn't recover lost files, it just undoes changes in the buffer itself." (t (archive-extract-by-stdout archive - ;; unzip expands wildcards in NAME, so we need to quote it. + ;; unzip expands wildcards in NAME, so we need to quote it. But + ;; not on DOS/Windows, since that fails extraction on those + ;; systems, and file names with wildcards in zip archives don't + ;; work there anyway. ;; FIXME: Does pkunzip need similar treatment? - ;; (7z doesn't need to quote wildcards) - (if (equal (car archive-zip-extract) "unzip") + (if (and (not (memq system-type '(windows-nt ms-dos))) + (equal (car archive-zip-extract) "unzip")) (shell-quote-argument name) name) archive-zip-extract)))) |