From 215a646d365163c1f379e770647bd72e781d0571 Mon Sep 17 00:00:00 2001
From: Joel Holdbrooks <cjholdbrooks@gmail.com>
Date: Sat, 17 Aug 2013 09:55:32 -0700
Subject: [PATCH] Don't use `char?`

---
 src/clj/frak.clj | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/clj/frak.clj b/src/clj/frak.clj
index 8de473e..1cb683f 100644
--- a/src/clj/frak.clj
+++ b/src/clj/frak.clj
@@ -67,8 +67,8 @@
 (defn- render-trie [trie]
   (let [{vs :visitors ts :terminals} trie
         terminal? (set ts)
-        ks (->> (keys trie)
-                (filter char?)
+        ks (->> (dissoc trie :visitors :terminals)
+                (keys)
                 (sort-by (frequencies vs))
                 reverse)
         nks (if-let [cs (seq (filter #(nil? (trie %)) ks))]
-- 
2.25.1