latest
Pinchord · pinchord.git · Tickets · Changelog
Branches > build-process > latest > files
Add system name to chords.edn and unbundle from generate.clj
Commit: e5d9cb1419d6bcd6132519d29f8db0c29542ae85
Parent: 2afe73b
3 changed files:
chords.edn 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 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 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 ""}]