mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2024-12-23 15:00:27 +00:00
Code Issues 1 Releases Wiki Activity

Add /i switch to xcopy in jpm

Browse Source
This commit is contained in:
Calvin Rose 2019-11-12 02:51:37 -05:00
parent 86d21816b6
commit d71cf093bb
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
auxbin/jpm
View File

@ -223,8 +223,9 @@
[src dest]
(print "copying " src " to " dest "...")
(if is-win
(let [end (last (peg/match path-splitter src))]
(shell "xcopy" src (string dest "\\" end) "/y" "/s" "/e"))
(let [end (last (peg/match path-splitter src))
isdir (= (os/stat src :mode) :directory)]
(shell "xcopy" src (if isdir (string dest "\\" end) dest) "/y" "/s" "/e" "/i"))
(shell "cp" "-rf" src dest)))
#