mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-10-31 07:33:01 +00:00
Code Issues 1 Releases Wiki Activity

Remove use of cd in make-lockfile.

Browse Source
This commit is contained in:
Calvin Rose
2020-03-26 00:12:18 -05:00
parent 6e8aac984f
commit d2d0300c7e
1 changed files with 6 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
auxbin/jpm
View File

@@ -683,14 +683,12 @@ int main(int argc, const char **argv) {
(def cwd (os/cwd))
(def packages @[])
# Read installed modules from manifests
(os/cd (find-manifest-dir))
(defer (os/cd cwd)
(each man (os/dir ".")
(def package (parse (slurp man)))
(if (or (not package :repo) (not package :sha))
(print "Cannot add local package " man " to lockfile, skipping...")
(array/push packages package))
(os/cd "..")))
(def mdir (find-manifest-dir))
(each man (os/dir mdir)
(def package (parse (slurp (string mdir sep man))))
(if (or (not (package :repo)) (not (package :sha)))
(print "Cannot add local package " man " to lockfile, skipping...")
(array/push packages package)))
# Put in correct order, such that a package is preceded by all of its dependencies
(def ordered-packages @[])
(def resolved @{})