e5d9cb1

chords.edn modified (view file)

@@ -1,4 +1,5 @@-{:version "v30.0"+{:chords/system-name "Pinchord"+ :version "v30.0"  :chords/banks [:prefixes :initials :vowels :finals :suffixes]  :chords/bank-keys {:prefixes "#+"                     :initials "TSPWHR&"

pinchord-javelin-dictionary-v30.0.yaml modified (view file)

@@ -1,4 +1,4 @@-name: Pinchord Base v30.0+name: Pinchord v30.0 maximumOutlineLength: 1 starters: - {stroke: '#+', definition: '{^}{-|}', mask: '#+'}

src/org/pinchord/generate.clj modified (view file)

@@ -50,10 +50,10 @@ (defn build-javelin-dictionary   "Returns the Javelin orthospelling YAML dictionary.    'letters' entry chords are sorted by chord length to keep diffs clean."-  [{:chords/keys [banks bank-keys bank-chords]+  [{:chords/keys [banks bank-keys bank-chords system-name]     :keys [version]}]   (let [bank->priority (zipmap banks (map inc (range)))]-    {:name (str "Pinchord Base " version)+    {:name (str system-name " " version)      :maximumOutlineLength 1      :starters [{:stroke "#+" :definition "{^}{-|}" :mask "#+"}                 {:stroke "" :definition "{}" :mask ""}]