     #_(println "Switching project:" proj)))
 
 (def ^{:private true} make-icon icon)
+
+
 
 (defn add-content-tab
   "Add a tab to the content pane."

    (reset! project-browser pb)
    (reset! repl-input-window ri)
    (reset! repl-output-window ro)
    (reset! current-filename (:current-filename @current-profile))
    (make-ui)
    (load-file (str "src" File/separator "brevis" File/separator "ui" File/separator "keybinds.clj"))
    (add-content-tab-from-filename @current-filename params)
    #_(when-not (empty? (:current-filename @current-profile))      
       (.setText (:text-area ew) (slurp @current-filename)))))


                               :text filename #_(last (string/split @current-filename #"/")) #_@current-filename;; with text set to txt
                               :foreground :blue) 
                      ;:filename @current-filename 
                      :tip filename
                      :icon (.getIcon chooser (file filename))
                      :content (RTextScrollPane. textArea)})))
        
(defn make-editor-window
