   (assert (not= frame nil))
   (let [ctrl-enter-keystroke (seesaw.keystroke/keystroke "control ENTER")
         sql-text-area (seesaw.core/select frame [:#sql])]
+    (assert (not (nil? sql-text-area)))
     (seesaw.core/listen sql-text-area :key-pressed (partial on-key-press handler ctrl-enter-keystroke))))
 
 

            seesaw.table)
  (:require [sqls.ui.dev-util :as ui-dev]
            [sqls.util :refer [str-or-nil?]])
  [:import [java.awt Dimension Rectangle]
           [java.io File]
           [javax.swing JFrame JPanel JScrollPane JTable JViewport KeyStroke]
           [javax.swing.table TableColumn]])


(defn create-worksheet-frame


(ns sqls.ui.worksheet
  (:use [clojure.string :only (join split-lines trim)])
  (:require [clojure.tools.logging :refer [spy spyf]])
  (:require seesaw.chooser
