diff options
| author | Richard M. Stallman <rms@gnu.org> | 1995-03-31 01:56:18 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1995-03-31 01:56:18 +0000 |
| commit | 108aa1b5f05b036d9bd0926fd820e89c44fc92e7 (patch) | |
| tree | 836b4846bb307603ac7a4281a866a2fbea821401 /lisp/files.el | |
| parent | 45486731af0f5ee95a877c9020fd5b66a152dd81 (diff) | |
| download | emacs-108aa1b5f05b036d9bd0926fd820e89c44fc92e7.tar.gz emacs-108aa1b5f05b036d9bd0926fd820e89c44fc92e7.tar.bz2 emacs-108aa1b5f05b036d9bd0926fd820e89c44fc92e7.zip | |
(insert-directory): Use \ before insert-directory-program
to ignore shell aliasing.
Diffstat (limited to 'lisp/files.el')
| -rw-r--r-- | lisp/files.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index 6abe596ef01..0003bd533fe 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -2203,7 +2203,8 @@ If WILDCARD, it also runs the shell specified by `shell-file-name'." (substring pattern (match-beginning 0))) beg (1+ (match-end 0)))) (call-process shell-file-name nil t nil - "-c" (concat insert-directory-program + "-c" (concat "\\" ;; Disregard shell aliases! + insert-directory-program " -d " (if (stringp switches) switches |