11 lines
303 B
Clojure
11 lines
303 B
Clojure
(ns cli-cms.main
|
|
(:require
|
|
[cli-cms.create :as create]
|
|
[cli-cms.delete :as delete]))
|
|
|
|
(defn -main [& args]
|
|
(case (first args)
|
|
"create" (create/run)
|
|
"delete" (delete/run)
|
|
"edit" (println "TODO: implment edit snippet")
|
|
(println "Missing command. Try create, edit, or delete.")))
|