simon/mw-scittle
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

update build

Browse source
This commit is contained in:
Michiel Borkent 2021-05-25 13:08:40 +02:00
parent bef16ec199
commit e488f804c7
3 changed files with 1755 additions and 2489 deletions
Download patch file Download diff file Expand all files Collapse all files

18
tictactoe.html
View file

@ -48,15 +48,15 @@
<pre><code class="html">&lt;script type=&quot;application/x-sci&quot; src=&quot;cljs/tictactoe.cljs&quot;&gt;&lt;/script&gt;</code></pre>
</p>
<pre><code class="language-clojure" id="cljs"></code></pre>
<script type="text/javascript">
function setText () {
document.getElementById("cljs").innerHTML = (this.responseText);
hljs.highlightAll();
}
var oReq = new XMLHttpRequest();
oReq.addEventListener("load", setText);
oReq.open("GET", "cljs/tictactoe.cljs");
oReq.send();
<script type="application/x-sci">
(defn set-text [progress-event]
(let [elt (.getElementById js/document "cljs")]
(set! (.-innerHTML elt) (.. progress-event -srcElement -responseText))
(.highlightAll js/hljs)))
(def oreq (js/XMLHttpRequest.))
(.addEventListener oreq "load" set-text)
(.open oreq "GET" "cljs/tictactoe.cljs")
(.send oreq)
</script>
</body>
</html>