Add the symbol option and its default.
This commit is contained in:
@@ -2,6 +2,7 @@
|
|||||||
(:require
|
(:require
|
||||||
[cipher-analytical-machine.file :as file]
|
[cipher-analytical-machine.file :as file]
|
||||||
[cipher-analytical-machine.caesar :as caesar]
|
[cipher-analytical-machine.caesar :as caesar]
|
||||||
|
[cipher-analytical-machine.symbol-factories :as sf]
|
||||||
[clojure.string :as cs]
|
[clojure.string :as cs]
|
||||||
[clojure.tools.cli :refer [parse-opts]])
|
[clojure.tools.cli :refer [parse-opts]])
|
||||||
(:gen-class))
|
(:gen-class))
|
||||||
@@ -17,6 +18,8 @@
|
|||||||
:default "Caesar"]
|
:default "Caesar"]
|
||||||
["-e" "--encrypt" "Encrypt the message."]
|
["-e" "--encrypt" "Encrypt the message."]
|
||||||
["-d" "--decrypt" "Decrypt the message."]
|
["-d" "--decrypt" "Decrypt the message."]
|
||||||
|
["-s" "--symbols" "The string will be used as a set of symbols for a cipher."
|
||||||
|
:default (sf/default-symbol-factory "en")]
|
||||||
["-h" "--help"]])
|
["-h" "--help"]])
|
||||||
|
|
||||||
(defn usage [options-summary]
|
(defn usage [options-summary]
|
||||||
|
|||||||
Reference in New Issue
Block a user