diff clojure/com/aurellem/vbm.clj @ 134:718abf3bec8a

removed hardcoded /home/r/ strings from paths and made them relative to user.home
author Robert McIntyre <rlm@mit.edu>
date Sun, 18 Mar 2012 00:56:29 -0500
parents 65c2854c5875
children eb6ba88088d3
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/vbm.clj	Sun Mar 18 00:33:00 2012 -0500
     1.2 +++ b/clojure/com/aurellem/vbm.clj	Sun Mar 18 00:56:29 2012 -0500
     1.3 @@ -6,7 +6,7 @@
     1.4  ;;;;;;;;;;;;; read vbm file 
     1.5  
     1.6  (def ^:dynamic *moves-cache*
     1.7 -  (File. "/home/r/proj/pokemon-escape/moves/"))
     1.8 +     (File. user-home "proj/pokemon-escape/moves/")))
     1.9  
    1.10  (defn buttons [mask]
    1.11    (loop [buttons []
    1.12 @@ -115,11 +115,12 @@
    1.13  
    1.14  (use 'clojure.java.shell)
    1.15  
    1.16 +(def vba-linux (File. user-home "bin/vba-linux"))
    1.17  
    1.18  (defn play-vbm [#^File vbm]
    1.19    (.delete yellow-save-file)
    1.20    (if (.exists vbm)
    1.21 -    (sh "/home/r/bin/vba-linux"
    1.22 +    (sh (.getCanonicalPath vba-linux)
    1.23          (str "--playmovie=" (.getCanonicalPath vbm))
    1.24          (.getCanonicalPath yellow-rom-image)))
    1.25    nil)