Mercurial > emacs

changeset 24441:6643d1ccd5a1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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 faac941ad28d
children 252453d80f53
files lisp/w32-fns.el
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
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