io.pathnames: fix separator when appending paths in Windows
parent
a5c0ba98d0
commit
b477c43293
|
@ -89,7 +89,7 @@ PRIVATE>
|
|||
|
||||
: append-relative-path ( path1 path2 -- path )
|
||||
[ trim-tail-separators ]
|
||||
[ trim-head-separators ] bi* "/" glue ;
|
||||
[ trim-head-separators ] bi* path-separator glue ;
|
||||
|
||||
: append-path ( path1 path2 -- path )
|
||||
{
|
||||
|
|
Loading…
Reference in New Issue