Fix move to update stance.
    
        | author | Steve Losh <steve@stevelosh.com> | 
    
        | date | Thu, 07 Jul 2011 09:39:18 -0400 | 
    
    
        | parents | c242e7b1f58c | 
    
        | children | 15fc94698c92 | 
    
        | branches/tags | (none) | 
    
        | files | src/clojurecraft/actions.clj src/clojurecraft/core.clj | 
Changes
    
--- a/src/clojurecraft/actions.clj	Tue Jul 05 20:57:11 2011 -0400
+++ b/src/clojurecraft/actions.clj	Thu Jul 07 09:39:18 2011 -0400
@@ -9,7 +9,8 @@
             new-location (merge location
                                 {:x (+ x-change (:x location))
                                  :y (+ y-change (:y location))
-                                 :z (+ z-change (:z location))})]
+                                 :z (+ z-change (:z location))
+                                 :stance (+ y-change (:stance location))})]
         (alter player merge {:location new-location}))))
   bot)
 
--- a/src/clojurecraft/core.clj	Tue Jul 05 20:57:11 2011 -0400
+++ b/src/clojurecraft/core.clj	Thu Jul 07 09:39:18 2011 -0400
@@ -88,11 +88,11 @@
 
 
 ; Scratch --------------------------------------------------------------------------
-;(def bot (connect minecraft-local))
-(act/move bot -3 0 -4)
+(def bot (connect minecraft-local))
+(act/move bot 0 4 0)
 ;(pprint @(:packet-counts-in bot))
 ;(pprint @(:packet-counts-out bot))
-;(println (:world bot))
+;(pprint (:player bot))
 ;(println (:location @(:player bot)))
 ;(disconnect bot)