diff --git a/src/toascii/models/flf.clj b/src/toascii/models/flf.clj
index 8d2612b..b03af8e 100644
--- a/src/toascii/models/flf.clj
+++ b/src/toascii/models/flf.clj
@@ -159,6 +159,11 @@
 (defn get-font [name]
   (get @fonts name))
 
+(defn get-font-names []
+  (->> @fonts
+       (vals)
+       (sort)))
+
 (defn load-all! []
   (->> flf-files
        (reduce