--- deliantra/Deliantra/Deliantra.pm	2009/01/11 22:03:03	1.129
+++ deliantra/Deliantra/Deliantra.pm	2009/06/25 13:15:56	1.130
@@ -184,6 +184,10 @@
       'eq' => sub { "$_[0]" eq "$_[1]" },
       'ne' => sub { "$_[0]" ne "$_[1]" },
    ;
+
+   sub TO_JSON {
+      $_[0][0]
+   }
 }
 
 sub Deliantra::MoveType::new {