 
 (defn resolve-renderer
   "Converts keyword to Processing renderer string constant.
-  This string can be passed to native Processing methods."
+  This string can be passed to native Processing methods.
+  If renderer passed as String - do nothing and simply return it"
   [renderer]
-  (resolve-constant-key renderer renderer-modes))
+  (cond (keyword? renderer) (resolve-constant-key renderer renderer-modes)
+        (string? renderer) renderer
+        :default (throw (RuntimeException. ":renderer should be keyword or string"))))
 
 (defn- display-size
   "Returns size of screen. If there are 2 or more screens it probably return size of

  (set! (.finished applet) true))

(defn- prepare-applet-frame
  [applet title renderer]
  (let [m              (meta applet)
        keep-on-top?   (:keep-on-top m)
        frame          (.frame applet)

                     (str "--bgcolor" "=" (str (:bgcolor (meta applet)))))
                    "--hide-stop" title])))
   applet)
  (prepare-applet-frame applet title))


(def ^{:private true}
