comparison clojure/com/aurellem/run/final_cut.clj @ 606:47572d444485

final video rendered.
author Robert McIntyre <rlm@mit.edu>
date Sun, 02 Sep 2012 23:44:22 -0500
parents 54644b08da1a
children 743b7b68e74e
comparison
equal deleted inserted replaced
605:54644b08da1a 606:47572d444485
133 ;; "-f" "webm" 133 ;; "-f" "webm"
134 ;; "-g" "200" 134 ;; "-g" "200"
135 ;; (.getCanonicalPath movie)) nil)) 135 ;; (.getCanonicalPath movie)) nil))
136 136
137 (defn final-cut! [^File render-dir] 137 (defn final-cut! [^File render-dir]
138 (let [movie (File. render-dir "final.avi") 138 (let [movie (File. render-dir "rlm-yellow-hack.avi")
139 final-audio (File. render-dir "final.mp3") 139 final-audio (File. render-dir "final.mp3")
140 final (File. render-dir "final")] 140 final (File. render-dir "final")]
141 (.delete movie) 141 (.delete movie)
142 (.delete final-audio) 142 (.delete final-audio)
143 (clojure.java.shell/sh 143 (clojure.java.shell/sh