lucy-commits mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From mar...@apache.org
Subject [lucy-commits] svn commit: r1060926 - /incubator/lucy/trunk/clownfish/lib/Clownfish/ParamList.pm
Date Wed, 19 Jan 2011 19:35:50 GMT
Author: marvin
Date: Wed Jan 19 19:35:50 2011
New Revision: 1060926

URL: http://svn.apache.org/viewvc?rev=1060926&view=rev
Log:
Correct a parameter validation which was validating the wrong variable.

Modified:
    incubator/lucy/trunk/clownfish/lib/Clownfish/ParamList.pm

Modified: incubator/lucy/trunk/clownfish/lib/Clownfish/ParamList.pm
URL: http://svn.apache.org/viewvc/incubator/lucy/trunk/clownfish/lib/Clownfish/ParamList.pm?rev=1060926&r1=1060925&r2=1060926&view=diff
==============================================================================
--- incubator/lucy/trunk/clownfish/lib/Clownfish/ParamList.pm (original)
+++ incubator/lucy/trunk/clownfish/lib/Clownfish/ParamList.pm Wed Jan 19 19:35:50 2011
@@ -43,7 +43,7 @@ sub new {
     # Validate or init initial_values.
     if ( defined $self->{initial_values} ) {
         confess "variables must be an arrayref"
-            unless ref( $self->{variables} ) eq 'ARRAY';
+            unless ref( $self->{initial_values} ) eq 'ARRAY';
         my $num_init = scalar @{ $self->{initial_values} };
         my $num_vars = $self->num_vars;
         confess("mismatch of num vars and init values: $num_vars $num_init")



Mime
View raw message