--- deliantra/Deliantra/Deliantra.pm	2007/02/07 00:56:06	1.86
+++ deliantra/Deliantra/Deliantra.pm	2007/02/09 01:49:35	1.87
@@ -570,6 +570,11 @@
       my $more = delete $a{more}; # arches do not support 'more', but old maps can contain some
       my $anim = delete $a{anim};
 
+      if ($a{_atype} eq 'object') {
+         $str .= join "\n", "anim", @$anim, "mina\n"
+            if $anim;
+      }
+
       my @kv;
 
       for ($a{_name} eq "map"
@@ -625,11 +630,6 @@
          $append->($_) for @$inv;
       }
 
-      if ($a{_atype} eq 'object') {
-         $str .= join "\n", "anim", @$anim, "mina\n"
-            if $anim;
-      }
-
       $str .= "end\n";
 
       if ($a{_atype} eq 'object') {