如何使Dock图标出现在mac上的Clojure应用程序中？

Question

目前没有出现任何东西(甚至是java咖啡杯)。

我使用lein new reagent name创建了我的应用程序，并尝试了这些jvm选项：

java -Xdock:name=Name
     -Xdock:icon=/Users/bmaddy/Downloads/logo.jpg
     -Dapple.awt.UIElement=true
     -Djava.awt.headless=false
     -jar name.jar

Answer 1

事实证明，仅仅使用荡秋千就可以使码头图标出现。足够满足我的需要了。

(ns name.server
  (:use seesaw.core)

我试过的其他东西：

这里描述的automator方法只给出了一个启动应用程序的图标，并且它在运行时没有停留：https://discussions.apple.com/thread/4805123

这里有一些好主意，但我没能让它们中的任何一个发挥作用：https://apple.stackexchange.com/questions/191609/how-to-create-a-app-folder-from-an-executable-jar

从零开始构建.app包会导致大量LSOpenURLsWithRole() failed with error -10810错误，但这似乎是最正确的方法。

Answer 2

为什么不使用Java互操作呢？下面是所以贴的问题：

// let's translate this
import com.apple.eawt.Application;
...
Application application = Application.getApplication();
Image image = Toolkit.getDefaultToolkit().getImage("icon.png");
application.setDockIconImage(image);

// into Clojure
(import com.apple.eawt.Application java.awt.Toolkit)
(let [app (Application/getApplication)
      image (.getImage (Toolkit/getDefaultToolkit) "icon.png")]
   (.setDockIconImage app image)))