Skip to content
This repository has been archived by the owner on Jul 18, 2020. It is now read-only.

Commit

Permalink
That's what we get for relying on a private var.
Browse files Browse the repository at this point in the history
  • Loading branch information
technomancy committed Apr 4, 2013
1 parent 31cf5b4 commit cee12c3
Show file tree
Hide file tree
Showing 2 changed files with 6 additions and 13 deletions.
2 changes: 1 addition & 1 deletion project.clj
@@ -1,4 +1,4 @@
(defproject lein-standalone-repl "0.1.4"
(defproject lein-standalone-repl "0.1.5"
:description "Backport of a bugfix for trampoline repl."
:url "https://github.com/technomancy/lein-standalone-repl"
:license {:name "Eclipse Public License"
Expand Down
17 changes: 5 additions & 12 deletions src/leiningen/standalone_repl.clj
@@ -1,19 +1,12 @@
(ns leiningen.standalone-repl
(:require [leiningen.trampoline :as trampoline]
[leiningen.repl :as repl]
[leiningen.core.eval :as eval]
[leiningen.core.project :as project]
[leiningen.core.user :as user]))

(defn- trampoline-repl [project]
(let [profiles (repl/profiles-for project true true)]
(eval/eval-in-project
(project/merge-profiles project profiles)
`(reply.main/launch-standalone ~(repl/options-for-reply project))
`(require ~@(#'leiningen.repl/init-requires project 'reply.main)))))
[leiningen.run :as run]
[leiningen.core.project :as project]))

(defn standalone-repl
"Backport of a bugfix for trampoline repl."
[project]
(with-redefs [leiningen.repl/trampoline-repl trampoline-repl]
(trampoline/trampoline project "repl")))
(trampoline/trampoline (project/merge-profiles project
[repl/trampoline-profile])
"run" "-m" "reply.main/launch-standalone" "nil"))

0 comments on commit cee12c3

Please sign in to comment.