[#535] fix order in --uberscript

This commit is contained in:
Michiel Borkent 2020-08-16 15:59:38 +02:00
parent 9d5f3337bc
commit 0829ccbe2e
2 changed files with 3 additions and 2 deletions

2
sci

@ -1 +1 @@
Subproject commit 74b6c7cfb732b46e04a6c6f9209c41f210f37571
Subproject commit 0da67e32e2930aa0ea18c9350b8a40fc0b9cb502

View file

@ -517,6 +517,7 @@ If neither -e, -f, or --socket-repl are specified, then the first argument that
:imports imports
:load-fn load-fn
:dry-run uberscript
:reload true
:readers core/data-readers}
opts (addons/future opts)
sci-ctx (sci/init opts)
@ -582,7 +583,7 @@ If neither -e, -f, or --socket-repl are specified, then the first argument that
uberscript
(let [uberscript-out uberscript]
(spit uberscript-out "") ;; reset file
(doseq [s @uberscript-sources]
(doseq [s (dedupe @uberscript-sources)]
(spit uberscript-out s :append true))
(spit uberscript-out preloads :append true)
(spit uberscript-out expression :append true)))