diff Lib/IMPL/Object/List.pm @ 18:818c74b038ae

DOM Schema + tests
author Sergey
date Thu, 10 Sep 2009 17:42:47 +0400
parents 75980091813b
children 16ada169ca75
line wrap: on
line diff
--- a/Lib/IMPL/Object/List.pm	Wed Sep 09 17:43:31 2009 +0400
+++ b/Lib/IMPL/Object/List.pm	Thu Sep 10 17:42:47 2009 +0400
@@ -19,7 +19,7 @@
 }
 
 sub Append {
-    push @{$_[0]}, @_{1 .. @$_-1};
+    push @{$_[0]}, @_[1 .. $#_];
 }
 
 sub RemoveLast {