combine all parsed char groups into a single :chars map

This commit is contained in:
Gered 2014-03-29 15:08:07 -04:00
parent 6d2909d152
commit 4f39c6b112

View file

@ -82,7 +82,7 @@
(drop (+ num-basic-char-lines num-ext-char-lines)) (drop (+ num-basic-char-lines num-ext-char-lines))
(partition (inc char-height)))] (partition (inc char-height)))]
{:header header {:header header
:basic-chars (parse-basic-chars header basic-chars) :chars (merge
:ext-chars (parse-ext-chars header ext-chars) (parse-basic-chars header basic-chars)
:other-chars (parse-other-chars header other-chars)}))) (parse-ext-chars header ext-chars)
(parse-other-chars header other-chars))})))