mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(convert-standard-filename): Convert directory

Browse source 
separators to Windows format.
This commit is contained in:
Andrew Innes 1999-03-05 16:15:58 +00:00
parent 10cf099d62
commit dd89ee9520
1 changed files with 4 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/w32-fns.el
View file

@ -233,6 +233,10 @@ with a definition that really does change some file names."
(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