Compare commits
1
Commits
0.6.1
..
becb168e0c
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
becb168e0c |
@@ -122,10 +122,8 @@
|
||||
(defn set-symbols
|
||||
"Set defaults symbols for a language."
|
||||
[options]
|
||||
(if (contains? options :language)
|
||||
(set-option options :symbols
|
||||
(sf/default-symbol-factory (:language options)))
|
||||
options))
|
||||
(set-option options :symbols
|
||||
(sf/default-symbol-factory (:language options))))
|
||||
|
||||
(defn load-and-set-option
|
||||
"Load the option and set it."
|
||||
|
||||
@@ -79,7 +79,7 @@
|
||||
ciphertext "bca"
|
||||
key 1
|
||||
symbols "abc"
|
||||
frequencies "etaoinsrhldcumfpgwybvkxjqz"]
|
||||
frequencies sf/english-letter-frequencies]
|
||||
(testing "The ciphertext is 'bca' and key is 1."
|
||||
(is (= plaintext
|
||||
(frequency-analizer-get-plaintext ciphertext symbols frequencies))))))
|
||||
|
||||
Reference in New Issue
Block a user