Permalink
Browse files

removing CR from deployed js source code (win)

  • Loading branch information...
1 parent 202d346 commit 962f998695a9d4d469c0a6911893df856fe669ca @6502 committed Aug 26, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 deploy.lisp
View
@@ -183,7 +183,7 @@ reverse engineering point of view.
(when (= ix -1)
(setf ix (length *repo*))
(push x *repo*)
- (let ((ii (+ "" x)))
+ (let ((ii (replace (+ "" x) "\r" "")))
(setf ii (replace ii "f.usedglobs=\\[[^\\]]*\\];f.outcalls=\\[[^\\]]*\\];f.arglist=[^;]*;" ""))
(incf *repcode* ~"r{ix}={ii};"))
(when x.usedglobs

0 comments on commit 962f998

Please sign in to comment.