                 (let [url (subs (config (id :doc-ta) :text) (first s) (second s))]
                   (future (doall (clojure.java.browse/browse-url url)))))))))
 
+(add-app-action :manual-refresh-browser-action
+  (action :name "Manual Refresh"
+          :key  "menu R"
+          :handler (fn [e]
+            (auto-refresh-browser-handler {:root (to-root e)}))))
 
 
 ;; Init functions called during construction of a frame with its widget hierarchy

         :listen [:action (fn [e] (swap! group-vars-by-object-type-atom (fn [_] (config vars-categorized-cb :selected?))))]
        :selected? false)
      
      (config! vars-search-doc-also-cb 
         :listen [:action (fn [e] (swap! vars-search-doc-also-cb-atom (fn [_] (config vars-search-doc-also-cb :selected?))))]
        :selected? false)

    (let [main-menu (menubar :id :main-menu)
          edit-menu (menu :text "Edit"  :id :edit-menu)
          file-menu (menu :text "File"  :id :file-menu)
          ns-menu (menu :text "Namespaces" :id :ns-menu)
          vars-menu (menu :text "Vars" :id :vars-menu)
          docs-menu (menu :text "Docs" :id :docs-menu)
          clojuredocs-menu (menu :text "ClojureDocs" :id :clojuredocs-menu)
          window-menu (menu :text "Window" :id :window-menu)
          help-menu (menu :text "Help"  :id :help-menu)
