* lisp/files.el (insert-directory): Quote switches in wildcard case.
Use shell-quote-wildcard-pattern on the switches string split by split-string-and-unquote. This helps to quote such switches as "--block-size='1" (bug#71935).
This commit is contained in:
parent
8911d53ce5
commit
b249f022f1
1 changed files with 9 additions and 3 deletions
|
@ -8193,9 +8193,15 @@ normally equivalent short `-D' option is just passed on to
|
|||
"\\") ; Disregard Unix shell aliases!
|
||||
insert-directory-program
|
||||
" -d "
|
||||
(if (stringp switches)
|
||||
switches
|
||||
(mapconcat #'identity switches " "))
|
||||
;; Quote switches that require quoting
|
||||
;; such as "--block-size='1". But don't
|
||||
;; quote switches that use patterns
|
||||
;; such as "--ignore=PATTERN" (bug#71935).
|
||||
(mapconcat #'shell-quote-wildcard-pattern
|
||||
(if (stringp switches)
|
||||
(split-string-and-unquote switches)
|
||||
switches)
|
||||
" ")
|
||||
" -- "
|
||||
;; Quote some characters that have
|
||||
;; special meanings in shells; but
|
||||
|
|
Loading…
Add table
Reference in a new issue