   "Built menu for given browser-root-frame.
   Note that each frame has its own menu, which will be active when frame is in-focus."
   [root]
-  (let [;;root (frame :id :fake-root)
-        id (partial select-id root)]
+  (let [id (partial select-id root)]
 
     ;; built-up menu-bar
     (let [main-menu (menubar :id :main-menu)

    (b/bind
      (id :update-clojuredocs-btn-atom)
      (b/transform (fn [& o]
        (invoke-later
          (let [f (str (System/getProperty "user.home") "/.clojuredocs-snapshot.txt")]
            (spit f (slurp
        "https://raw.github.com/jafingerhut/cd-client/develop/snapshots/clojuredocs-snapshot-latest.txt"))
            (alert (str "Locally cached copy of ClojureDocs updated at:" \newline f)))))))
    ;;
    ;; inspect-btn pressed =>
    ;; If var is selected and its value is a collection, create inspector.

          clojuredocs-menu (menu :text "ClojureDocs" :id :clojuredocs-menu)
          window-menu (menu :text "Window" :id :window-menu)
          help-menu (menu :text "Help"  :id :help-menu)
          
          font-menu (menu :text "Font"  :id :font-menu)
          ;;(config! (id :doc-ta) :font "Menlo")
          ;;(config! (id :doc-ta) :font "Monospaced")
          ;;(config! (id :doc-ta) :font "Inconsolata")
          font-btn-group (button-group)
          font-Monospaced-rb (radio-menu-item :text "Monospaced" :id :font-Monospaced-rb :group font-btn-group)
          font-Menlo-rb (radio-menu-item :text "Menlo" :id :font-Menlo-rb :group font-btn-group)
          font-Inconsolata-rb (radio-menu-item :text "Inconsolata" :id :font-Inconsolata-rb :group font-btn-group)
        
          update-clojuredocs (menu-item :text "ClojureDocs Update local repo" :id :update-clojuredocs-btn)
          clojuredocs-access-btn-group (button-group)
          clojuredocs-online-rb (radio-menu-item :text "ClojureDocs Online" :id :clojuredocs-online-rb :group clojuredocs-access-btn-group)
