Как автоматизировать запуск причала / appengine-magic и swank? - PullRequest
Новая
       21

Как автоматизировать запуск причала / appengine-magic и swank?

2 голосов
/ 15 марта 2011

С моим проектом Clojure / appengine-magic я сейчас запускаю такие вещи как: 

lein repl

(doto 'tlog.core require in-ns)
(compile 'tlog.core)
(ae/start tlog-app)
(require 'swank.swank) (swank.swank/start-repl 4005)

tlog.core имеет: 

(:require [appengine-magic.core :as ae])

В качестве альтернативы, вместо ae / startЯ мог бы использовать, я думаю: 

(use 'ring.adapter.jetty)
(run-jetty (var tlog.core/tlog-app-handler) {:port 8080})

Я хотел бы поместить все это в одну команду.

Все попытки обработать это через -main, используемые с lein run или не удалось написать плагин leiningen из-за проблем с пространством имен / путями.

Так как это можно сделать?

1 Ответ

2 голосов
/ 21 марта 2011

Благодаря примеру, приведенному кем-то, кто предпочел не отвечать здесь, у меня теперь есть довольно хорошее решение.

Дополнение к моему project.clj: 

:repl-init-script "src/tlog/init_repl.clj"

Будет запускаться при запуске lein repl.

INIT-repl.clj: 

(ns user
  "Init script for Leiningen REPL."
  (:require [appengine-magic.core :as ae])
  (:use [clojure.stacktrace]
        [clojure.contrib.repl-utils :only (show)]
        [tlog.core]))

(defn reload!
  "Force a reload of everything."
  []
  (require 'tlog.core :reload-all))

(compile 'tlog.core)
(ae/serve tlog-app)
(println "Interactive Jetty instance started. To force a reload: (reload!)")

(require 'swank.swank) (swank.swank/start-repl 4005)
...