diff options
| author | Gerd Moellmann | 2000-08-07 10:06:54 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 2000-08-07 10:06:54 +0000 |
| commit | 9facfd265c43348d0088ecb76a285843f127e747 (patch) | |
| tree | 00e13770875882204257207df7f14b2cc6c045bd | |
| parent | e0d8827bbeafcf4ff6e96b1fe90d8fd8ea29812a (diff) | |
| download | emacs-9facfd265c43348d0088ecb76a285843f127e747.tar.gz emacs-9facfd265c43348d0088ecb76a285843f127e747.zip | |
(shell-quote-wildcard-pattern): Make sure to return
PATTERN, in the Unix case.
| -rw-r--r-- | lisp/files.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index bb17d5ca13b..b86b8d64004 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -3453,7 +3453,9 @@ PATTERN that already quotes some of the special characters." | |||
| 3453 | (concat (substring pattern 0 (match-beginning 0)) | 3453 | (concat (substring pattern 0 (match-beginning 0)) |
| 3454 | "\\" | 3454 | "\\" |
| 3455 | (substring pattern (match-beginning 0))) | 3455 | (substring pattern (match-beginning 0))) |
| 3456 | beg (1+ (match-end 0))))))))) | 3456 | beg (1+ (match-end 0))))) |
| 3457 | pattern)))) | ||
| 3458 | |||
| 3457 | 3459 | ||
| 3458 | (defvar insert-directory-program "ls" | 3460 | (defvar insert-directory-program "ls" |
| 3459 | "Absolute or relative name of the `ls' program used by `insert-directory'.") | 3461 | "Absolute or relative name of the `ls' program used by `insert-directory'.") |