modularize runner script

2010-07-12 18:19:54 -05:00
parent 19a16f201f
commit b6c0b70de1
1 changed files with 8 additions and 3 deletions
--- a/src/path_to_enlightenment.clj
+++ b/src/path_to_enlightenment.clj
@@ -13,7 +13,8 @@
              (System/exit 0)))
          pairs))))

-(load "equalities"
+(def ordered-koans
+     ["equalities"
      "lists"
      "vectors"
      "sets"
@@ -23,6 +24,10 @@
      "higher_order_functions"
      "runtime_polymorphism"
      "sequence_comprehensions"
-      "partial_functions")
+      "partial_functions"])

-(println "You have achieved clojure enlightenment. Namaste.")
+(defn run []
+  (apply load ordered-koans)
+  (println "You have achieved clojure enlightenment. Namaste."))
+
+(run)