有人可以将此Java代码转换为Clojure

Question

有人可以将其转换为Clojure，我不知道要像setMainWindow(argument)一样做事......

import com.vaadin.Application;

class something {
    public void init() {
        Window main = new Window("The Main Window");
        setMainWindow(main);
        addComponent(new WindowOpener("Window Opener", main));
    }
}

更新

package app;

import com.vaadin.Application;
import com.vaadin.ui.Button;
import com.vaadin.ui.Window;

/**
 * The Application's "main" class
 */
@SuppressWarnings("serial")
public class MyVaadinApplication extends Application{
    private Window window;

    @Override
    public void init(){
        window = new Window("My Vaadin Application");
        setMainWindow(window);
        window.addComponent(new Button("Click Me"));
    }
} 

有一个“/lib/vaadin.jar”，其中包含所有“com.vaadin。*”的内容。
我认为setMainWindow(window);来自扩展类。我不会写那种方法。

Answer 1

直译：

(defn init []
  (let [main (Window. "The Main Window")]
    (setMainWindow main)
    (addComponent (WindowOpener. "Window Opener" main))))

虽然没有上下文它没有多大意义。

Answer 2

见http://dev.vaadin.com/wiki/Articles/ClojureScripting。我还建议http://www.odesk.com。