       (b/filter (fn [[doc-tf doc-lb]]
 ;;                  (printf "(class doc-lb)=%s (seq doc-lb)='%s' (map ... doc-lb)='%s'\n"
 ;;                          (class doc-lb) (seq doc-lb)
-;;                          (seq (map icon-to-name doc-lb)))
+;;                          (seq doc-lb))
 ;;                  (flush)
                   (not (or (nil? doc-tf)  (= "" doc-tf)
                            (nil? doc-lb) (= "" doc-lb)))))
       (b/transform
         (fn [[doc-tf doc-lb]]
           (future
-            (let [s (render-doc-text doc-tf (map icon-to-name doc-lb))]
+            (let [s (render-doc-text doc-tf doc-lb)]
               (when-not (= s (config (id :doc-ta) :text))
                 (invoke-soon (config! (id :doc-ta) :text s))))))))
     ;;

    (b/bind
      (apply b/funnel [(id :doc-tf)
                       (b/selection (id :doc-lb) {:multi? true})])
      (b/transform (fn [[doc-tf doc-lb]] [(config (id :doc-tf) :text)
                                          (map icon-to-name doc-lb)]))
      (b/transform (fn [[fqn doc-lb-sel]]
                     (let [doc-set (set doc-lb-sel)]
                       (if (or (doc-set "Value") (doc-set "All"))


(defn clojuredocs-offline-mode! []
  (let [f (clojuredocs-snapshot-filename)]
    (if (.exists (io/as-file f))
      ;; TBD: Consider trying to handle errors while reading the file.
      (let [s (with-out-str (cd-client.core/set-local-mode! f))]
        [:ok s])
