                 vars-header-lbl vars-lb]}
           (group-by-id root)
         {:keys [ns-require-btn-atom browse-btn-atom edit-btn-atom]}
-          (get @instance-atom-map root)]
+          (seesaw.meta/get-meta root :atom-map)]
     (invoke-soon (selection! ns-cbx "loaded"))
     (invoke-soon (selection! vars-cbx "publics"))
     (invoke-soon (selection! doc-cbx "Doc"))))

  "Returns a new browser root frame with an embedded browser form.
  Add new frame to atom-list browser-root-frms"
  []
  (let [root (frame :title "Clojure Namespace Browser")
        b-form (identify (clj_ns_browser.BrowserForm.))]
    (config! root :content b-form)
    (init-before-bind root)
    (bind-all root)
    (init-after-bind root)
    (swap! browser-root-frms (fn [a] (conj @browser-root-frms root)))
    (refresh-clj-ns-browser root)
    root))


(defn get-clj-ns-browser

            [seesaw.bind :as b]
            [clojure.java.browse]
            [clojure.java.shell]
            [seesaw.meta]
            [clojure.java.javadoc])
  (:use [clj-ns-browser.utils]
        [seesaw.core]
