         [:br]])
 
 (defn render-front-page-for-blacklist
-    [word url-prefix emender-page mode sources]
+    [word url-prefix emender-page mode]
     [:div {:class "container-fluid"}
         [:div {:class "row"}
             "The CCS Custom Dictionary Blacklist &ndash; allows you to add and remove words that are normally correct but should be reported as errors in Red Hat documentation by Emender (" [:a {:href emender-page} "see Emender page" ] ")"

                (render-navigation-bar-section user-name url-prefix title mode)
            (case mode
                :whitelist (render-front-page-for-whitelist word url-prefix emender-page mode)
                :blacklist (render-front-page-for-blacklist word url-prefix emender-page mode sources)
                :atomic-typos (render-front-page-for-atomic-typos word url-prefix emender-page mode)
                )
                

        :whitelist    "whitelist"
        :blacklist    "blacklist"
        :atomic-typos "atomic-typos"
        :universal    "universal"
                      "whitelist")) ; default

(defn search-href
