Cyrik

(ns cljfx.ext.web-view
  (:require [cljfx.lifecycle :as lifecycle]
            [cljfx.prop :as prop]
            [cljfx.mutator :as mutator]
            [cljfx.coerce :as coerce])
  (:import [javafx.scene.web WebView]
           [javafx.util Callback]))

(defn- coerce-content [x]
  (cond

Cyrik

{
  "autosize": {"type": "fit", "resize": false, "contains": "padding"},
  "height": 600,
  "width": 600,
  "background": "#2e3440",
  "scales": [
    {
      "name": "color",
      "type": "ordinal",
      "domain": {

Cyrik

(defn atest [state]
  (when-not (and (= "" state) (not (= (first state) \a))) 
          (list (first state) (. state (substring 1)))))
(defn op [state]
  (when-not (and (= "" state) (not (= (first state) \a)))
    (list #(list :| %1 %2) (. state (substring 1)))))
(defn chainl1-helper [x p op]
  (fn [state]
    (loop [x x
           state state]