mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2024-11-19 23:24:49 +00:00
Code Issues 1 Releases Wiki Activity

Format lock files for nicer diffs.

Browse Source
This commit is contained in:
Andrew Chambers 2020-05-18 15:42:42 +12:00
parent 8b98b331cc
commit 43d2ba6275
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
jpm
View File

@ -758,8 +758,15 @@ int main(int argc, const char **argv) {
(unless made-progress
(error (string/format "could not resolve package order for: %j"
(filter (complement resolved) (map |($ :repo) packages))))))
# Write to file
(with [f (file/open filename :w)] (with-dyns [:out f] (printf "%j" ordered-packages))))
# Write to file, manual format for better diffs.
(with [f (file/open filename :w)]
(with-dyns [:out f]
(prin "@[")
(eachk i ordered-packages
(unless (zero? i)
(prin "\n "))
(prinf "%j" (ordered-packages i)))
(print "]"))))
(defn- load-lockfile
[&opt filename]