section 7 video 2

tlipski · tlipski · commit c551aac99920 · 2014-04-11T23:37:59.000+02:00
diff --git a/cljs/project1/hello.cljs b/cljs/project1/hello.cljs
@@ -1,4 +1,9 @@
 (ns project1.hello)
 
-(js/alert "Hello ClojureScript!")
-
+(let [el (.createElement js/document "a")
+      txt (.createTextNode js/document "Hello world!")]
+ (.appendChild el txt)
+ (.setAttribute el "href" "#clojure")
+ (.addEventListener el "click"
+		    (fn [] (js/alert (str "Clicked: " (.-outerHTML el)))))
+ (.appendChild (.getElementById js/document "holder") el))
diff --git a/resources/public/js.html b/resources/public/js.html
@@ -2,6 +2,9 @@
 <head>
 </head>
 <body>
+<div id="holder">
+	Content here...
+</div>
 <script src="/app.js"></script>
 </body>
 </html>
