Mercurial > vba-clojure
diff clojure/com/aurellem/gb_driver.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 | bcb5c41626b4 |
children | d125a294f9d8 |
line wrap: on
line diff
1.1 --- a/clojure/com/aurellem/gb_driver.clj Sun Mar 18 00:33:00 2012 -0500 1.2 +++ b/clojure/com/aurellem/gb_driver.clj Sun Mar 18 00:56:29 2012 -0500 1.3 @@ -7,8 +7,10 @@ 1.4 ;; Savestates 1.5 (defrecord SaveState [data]) 1.6 1.7 +(def user-home (File. (System/getProperty "user.home"))) 1.8 + 1.9 (def ^:dynamic *save-state-cache* 1.10 - (File. "/home/r/proj/pokemon-escape/save-states/")) 1.11 + (File. user-home "proj/pokemon-escape/save-states/")) 1.12 1.13 (def current-state (atom nil)) 1.14 1.15 @@ -41,10 +43,10 @@ 1.16 (Gb/loadVBA) 1.17 1.18 (def yellow-rom-image 1.19 - (File. "/home/r/proj/pokemon-escape/roms/yellow.gbc")) 1.20 + (File. user-home "proj/pokemon-escape/roms/yellow.gbc")) 1.21 1.22 (def yellow-save-file 1.23 - (File. "/home/r/proj/pokemon-escape/roms/yellow.sav")) 1.24 + (File. user-home "proj/pokemon-escape/roms/yellow.sav")) 1.25 1.26 (def on? (atom nil)) 1.27