Add the default frequency factory.

2023-11-03 20:33:23 +02:00
parent fcae272944
commit ddfd5c473d
3 changed files with 25 additions and 1 deletions
@@ -9,7 +9,8 @@
  (let [analyzer (:analyzer options)
        message (:message options)
        symbols (:symbols options)
-        frequencies symbol-frequencies/english-letter-frequencies]
+        frequencies (-> (get options :language "en")
+                        (symbol-frequencies/default-frequency-factory))]
    (cond
      (= analyzer "Chi^2")
      (caesar-analyzers/get-plaintext message symbols frequencies)