[#535] use distinct instead of dedupe

This commit is contained in:
Michiel Borkent 2020-08-17 12:42:27 +02:00
parent 150b35e789
commit 60c73d21a6
2 changed files with 1 additions and 2 deletions

View file

@ -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)))

View file

@ -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"))))))