Added new tests, fixed a bug, and cleaned up more code: Intermediate check-in

[p5sagit/Excel-Template.git] / lib / Excel / Template / Iterator.pm

diff --git a/lib/Excel/Template/Iterator.pm b/lib/Excel/Template/Iterator.pm
index c251b81..2ec00aa 100644 (file)
--- a/lib/Excel/Template/Iterator.pm
+++ b/lib/Excel/Template/Iterator.pm
@@ -40,7 +40,7 @@ sub new
     # Cache the reference to the appropriate data.
     $self->{DATA} = $self->{CONTEXT}->param($self->{NAME});
 
-    unless (UNIVERSAL::isa($self->{DATA}, 'ARRAY'))
+    unless (ref $self->{DATA} eq 'ARRAY')
     {
         $self->{NO_PARAMS} = 1;
         warn "'$self->{NAME}' does not have a list of parameters", $/ if $^W;