Mercurial > emacs
diff lisp/w32-fns.el @ 24441:6643d1ccd5a1
(convert-standard-filename): Convert directory
separators to Windows format.
author | Andrew Innes <andrewi@gnu.org> |
---|---|
date | Fri, 05 Mar 1999 16:15:58 +0000 |
parents | ae5eea3cc314 |
children | 756058742361 |
line wrap: on
line diff
--- a/lisp/w32-fns.el Fri Mar 05 09:37:00 1999 +0000 +++ b/lisp/w32-fns.el Fri Mar 05 16:15:58 1999 +0000 @@ -233,6 +233,10 @@ (while (string-match "[?*:<>|\"\000-\037]" name start) (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)) ;;; Fix interface to (X-specific) mouse.el