gistfile1.clj

(ns test.core
  (:use seesaw.core)
  (:require 
    [seesaw.rsyntax :as r]))


(defn -main [& args]
  (invoke-later
    (-> (frame 
          :title "Hello",
          :content 
            (doto 
              (r/text-area
                :wrap-lines? true
             ;  :anti-aliasing-enabled true ; we can't use this
                )
              (.setAntiAliasingEnabled true)))
     show!)))