   (println "settings" settings)
   (println "connections" connections)
   (let [btn-add (button :id :btn-new :text "Add" :listen [:action on-btn-add-click])
-        btn-delete (button :id :btn-delete :text "Delete" :listen [:action on-btn-delete-click])
-        btn-connect (button :id :btn-connect :text "Connect")
+        btn-delete (button :id :btn-delete :text "Delete" :enabled? false :listen [:action on-btn-delete-click])
+        btn-connect (button :id :btn-connect :text "Connect" :enabled? false)
         frame (frame :title "SQLS"
                :content (vertical-panel :id :panel
                                         :border 4

                                                                          btn-connect])])
               :on-close :exit)]
    (listen btn-connect :action (partial on-btn-connect-click frame (:create-worksheet handlers)))
    frame))



(ns sqls.ui
  "Deal with UI"
  (:use seesaw.core)
  (:require [seesaw.bind :as b])
  (:require [sqls.stor :as stor])
  (:require seesaw.table)
  (:require sqls.ui.worksheet))
