Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

repaired stupid error using deflate-string for lisp forms

  • Loading branch information...
commit eaef0ccdb82067aa9c77ac4456bc3920d14cfe57 1 parent 3188f2e
Alexander Kahl authored
Showing with 4 additions and 3 deletions.
  1. +4 −3 src/target.lisp
View
7 src/target.lisp
@@ -28,7 +28,7 @@ an additional \"--eval\" element string."
(nconc forms (list "--eval"
(interpolate-argument
(if (listp form)
- (format nil "(~a)" (deflate-string form))
+ (format nil "~s" form)
form)
target #'default-sourcefn environment)))))))
@@ -219,8 +219,9 @@ honoring common quoting rules in line with Bourne shell syntax."))
(defmethod evolve ((trans generic-transformator))
(run-command
- (interpolate-commandline (rule trans))
- :target (name trans) :sourcefn (sourcefn trans)))
+ (interpolate-commandline (rule trans)
+ :target (name trans) :sourcefn (sourcefn trans)
+ :environment *environment*)))
;;; generic class
Please sign in to comment.
Something went wrong with that request. Please try again.