[Bps-public-commit] r18448 - Lorzy/trunk/lib/Lorzy/Expression

[clkao at bestpractical.com]

Author: clkao
Date: Wed Feb 18 11:38:29 2009
New Revision: 18448

Modified:
   Lorzy/trunk/lib/Lorzy/Expression/And.pm

Log:
remove debug info.

Modified: Lorzy/trunk/lib/Lorzy/Expression/And.pm
==============================================================================
--- Lorzy/trunk/lib/Lorzy/Expression/And.pm	(original)
+++ Lorzy/trunk/lib/Lorzy/Expression/And.pm	Wed Feb 18 11:38:29 2009
@@ -4,16 +4,8 @@
 
 sub evaluate {
     my ($self, $evaluator) = @_;
-    warn "==> at and!";
-    warn join(',',@{$self->nodes});
     for (@{$self->nodes}) {
-        warn "==> eval $_ ";#.Dumper($_);use Data::Dumper;
-        my $ret =$evaluator->evaluated_result($_);
-#        my $ret = $_->evaluate($evaluator);
-        warn $ret;
-        $ret or return 0;
-#        or return 0;
-        warn "==> done $_";
+        $evaluator->evaluated_result($_) or return 0;
     }
     return 1;
 }