   "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)

    )) ; end of bind-all



;;seesaw.core/toggle-full-screen! (locks up computer!!! don't use)
;;(seesaw.dev/show-options) and (seesaw.dev/show-events)

          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)
