         "b" "blacklist"
         "a" "atomic typos"
         "g" "glossary"
+        "u" "glossary"
             "unknown"))
 
 (defn render-users

                                     (if (= mode :blacklist)
                                         [:td (:description search-result)])
                                     [:td (handle-null :class search-result)]
                                     [:td (handle-null :use search-result)]
                                     [:td (handle-null :internal search-result)]
                                     [:td (handle-null :copyright search-result)]
                                     [:td (handle-null :source search-result)]

                [:br])
        [:br]])

(defn yes-no-with-caution
    [key-name search-results]
    (condp = (get search-results key-name)
        1 "yes"
        0 "no"
        2 "with caution"))

(defn handle-null
    [key-name search-results]
    (or (get search-results key-name) "N/A"))

(defn render-front-page
    "Render front page of this application."
