Comments on: doto Swing with Clojure

By: Colbert Sesanker

Colbert Sesanker — Thu, 05 Jan 2012 22:27:30 +0000

This tutorial is very helpful. The function:

(defn func-action [component event & f]
(.addActionListener component
(proxy [java.awt.event.ActionListener] []
(actionPerformed [event] (f))))))

works the same if “event” is passed in as “`event”. The problem is taking multiple functions for f (body in macro version) which works with the macro (save some exceptions). What is the advantage of using a macro, instead of a function, for cases like this?

By: LudoTheHUN

LudoTheHUN — Sat, 15 Oct 2011 22:55:50 +0000

Hello. Thank you very much for this Stuart. For my understanding, I tried to use the macro expended version of the code…. so:

(def button (doto (JButton. “Add 1″)
(on-action evnt ;; evnt is not used
(.repaint panel) (println “action jbuton click happened”))))
works fine, yet:
(def button (doto (JButton. “Add 1″)
(. evnt addActionListener
(proxy [java.awt.event.ActionListener] []
(actionPerformed [(.repaint panel)] (println “action jbuton click happened”))))))
fails, even though this is just the macroexpanded code of the macro…
any ideas why?

By: Clojure – Destillat #2 | duetsch.info - Open Source, Wet-, Web-, Software

Sat, 30 Jan 2010 12:25:40 +0000

[...] doto Swing with Clojure [...]