changeset 196:8dd17081829f

changed :moves to give a vector instead of hash-map because move order is important
author Robert McIntyre <rlm@mit.edu>
date Thu, 22 Mar 2012 23:42:31 -0500
parents 1844bdd56314
children 659764a2ea40
files clojure/com/aurellem/gb/pokemon.clj
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/gb/pokemon.clj	Thu Mar 22 23:39:02 2012 -0500
     1.2 +++ b/clojure/com/aurellem/gb/pokemon.clj	Thu Mar 22 23:42:31 2012 -0500
     1.3 @@ -228,7 +228,7 @@
     1.4          :dv dv-values
     1.5          :original-trainer OT-name
     1.6          :ID ID
     1.7 -        :moves (zipmap moves moves-pp)
     1.8 +        :moves (mapv vector moves moves-pp)
     1.9  
    1.10          ;; ephemerial
    1.11          :satus status
    1.12 @@ -299,7 +299,9 @@
    1.13         (print "\n")
    1.14         (println "+------------------+----+--------+--------+")
    1.15         (println "|       Move       | PP | Max PP | PP UPs |")
    1.16 -      
    1.17 +       (println "+------------------+----+--------+--------+")
    1.18 +
    1.19 +       
    1.20  
    1.21         (println "+------------------+----+--------+--------+")
    1.22