11 lines
262 B
Clojure
11 lines
262 B
Clojure
(ns book.core
|
|
(:require [book.cli]
|
|
[book.web])
|
|
(:gen-class))
|
|
|
|
(defn -main [& argv]
|
|
(case (first argv)
|
|
"web" (apply book.web/-main (rest argv))
|
|
"cli" (apply book.cli/-main (rest argv))
|
|
(println "First argument must be web or cli")))
|