Mercurial > emacs
changeset 24661:a969304198eb
(convert-standard-filename): Only convert directory
separators to backslash if the interactive shell is one of the
standard Windows shells that has DOS semantics.
| author | Andrew Innes <andrewi@gnu.org> |
|---|---|
| date | Sun, 02 May 1999 09:45:17 +0000 |
| parents | 809c3c8f6b77 |
| children | 5d61c3793c06 |
| files | lisp/w32-fns.el |
| diffstat | 1 files changed, 6 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/w32-fns.el Sun May 02 09:40:45 1999 +0000 +++ b/lisp/w32-fns.el Sun May 02 09:45:17 1999 +0000 @@ -254,10 +254,12 @@ (aset name (match-beginning 0) ?!) (setq start (match-end 0))) ;; convert directory separators to Windows format - (while (string-match "/" name start) - (aset name (match-beginning 0) ?\\) - (setq start (match-end 0))) - name)) + ;; (but only if the shell in use requires it) + (if (w32-shell-dos-semantics) + (while (string-match "/" name start) + (aset name (match-beginning 0) ?\\) + (setq start (match-end 0)))) + name)) ;;; Fix interface to (X-specific) mouse.el (defun x-set-selection (type data)