[#535] use distinct instead of dedupe
This commit is contained in:
parent
150b35e789
commit
60c73d21a6
2 changed files with 1 additions and 2 deletions
|
|
@ -604,7 +604,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 (dedupe @uberscript-sources)]
|
||||
(doseq [s (distinct @uberscript-sources)]
|
||||
(spit uberscript-out s :append true))
|
||||
(spit uberscript-out preloads :append true)
|
||||
(spit uberscript-out expression :append true)))
|
||||
|
|
|
|||
|
|
@ -42,7 +42,6 @@
|
|||
(tu/bb nil "--file" (.getPath tmp-file) "1" "2" "3" "4")))
|
||||
(testing "order of namespaces is correct"
|
||||
(tu/bb nil "--classpath" "test-resources/babashka/uberscript/src" "-m" "my.main" "--uberscript" (.getPath tmp-file))
|
||||
(prn (slurp (.getPath tmp-file)))
|
||||
(is (= "(\"1\" \"2\" \"3\" \"4\")\n"
|
||||
(tu/bb nil "--file" (.getPath tmp-file) "1" "2" "3" "4"))))))
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue