f0c3c32

generate-mods.clj modified (view file)

@@ -148,11 +148,13 @@                    "LS" {:no-mods "{^}\t"                          :with-mods "tab"}}}) -(defn apply-mods [mod-set chord _]+(defn apply-mods [mod-set chord repetitions]   (str "{#"-       (reduce (fn [acc mod]-                 (str mod "(" acc ")"))-               chord mod-set)+       (->> (reduce (fn [acc mod]+                      (str mod "(" acc ")"))+                    chord mod-set)+            (repeat repetitions)+            (str/join " "))        "}"))  (def vowel-chords@@ -231,10 +233,10 @@          symbols-with-mods (update-vals mod-shortcuts :with-mods)          e-repetitions (update-keys repetitions #(str % "e"))          repeated= #(str (apply repeated %&) "=")]-     [(generate-entries always-attach starter vowel-chords mapped-symbols       no-repetition apply-mods)-      (generate-entries never-attach  starter all-mods     shortcuts            no-repetition apply-mods)-      (generate-entries never-attach  starter no-mods      symbols-without-mods no-repetition repeated)-      (generate-entries never-attach  starter vowel-chords symbols-with-mods    no-repetition apply-mods)+     [(generate-entries always-attach starter vowel-chords mapped-symbols       repetitions apply-mods)+      (generate-entries never-attach  starter all-mods     shortcuts            repetitions apply-mods)+      (generate-entries never-attach  starter no-mods      symbols-without-mods repetitions repeated)+      (generate-entries never-attach  starter vowel-chords symbols-with-mods    repetitions apply-mods)       (generate-entries attach   starter no-mods      chords               repetitions   repeated)       (generate-entries attach   starter no-mods      chords               e-repetitions repeated=)]))) @@ -311,7 +313,7 @@  (def movement-dict   (flatten-map-   (generate-entries never-attach movement-starter all-mods movement-chords no-repetition apply-mods)))+   (generate-entries never-attach movement-starter all-mods movement-chords repetitions apply-mods)))  (def fingerspelling-starter "TWR") (def letters

plover_pinchord_31/dictionaries/pinchord-mods-31-3.json modified (view file)

Binary file, or too large to diff.