# HG changeset patch
# User Robert McIntyre <rlm@mit.edu>
# Date 1332399727 18000
# Node ID 4ea8ff49af8756df74eb5debae8a268519b0c3b5
# Parent  4f5ea93cbaca78545e6f198329e7cb610196c1e4
modified give-items to work with glitched items.

diff -r 4f5ea93cbaca -r 4ea8ff49af87 clojure/com/aurellem/gb/items.clj
--- a/clojure/com/aurellem/gb/items.clj	Thu Mar 22 01:25:39 2012 -0500
+++ b/clojure/com/aurellem/gb/items.clj	Thu Mar 22 02:02:07 2012 -0500
@@ -24,6 +24,7 @@
    0x04 :poke-ball
    0x05 :town-map
    0x06 :bicycle
+   0x07 :surfboard
    0x08 :safari-ball
    0x09 :pokedex
    0x0A :moon-stone
@@ -170,7 +171,7 @@
      (fn [[item-code quantity]]
        [(item-code->item-name
          item-code
-         (str ":0x" (.toUpperCase (Integer/toHexString item-code))))
+         item-code)
            quantity])
      (partition
       2
@@ -202,7 +203,7 @@
   (flatten
    (concat [(count inventory)]
            (map (fn [[item-name quantity]]
-                  [(item-name->item-code item-name)
+                  [(item-name->item-code item-name item-name)
                    quantity]) inventory)
            [(item-name->item-code :end-of-list-sentinel)])))