nuke debugging code

[catagits/HTML-Zoom.git] / lib / HTML / Zoom / StreamBase.pm

diff --git a/lib/HTML/Zoom/StreamBase.pm b/lib/HTML/Zoom/StreamBase.pm
index 96edbf0..3df8a81 100644 (file)
--- a/lib/HTML/Zoom/StreamBase.pm
+++ b/lib/HTML/Zoom/StreamBase.pm
@@ -23,12 +23,10 @@ sub flatten {
       return unless $source_stream;
       my $next;
       until (($next) = ($cur_stream ? $cur_stream->next : ())) {
-#::Dwarn $source_stream;
         unless (($cur_stream) = $source_stream->next) {
           undef $source_stream; return;
         }
       }
-#::Dwarn $next;
       return $next;
     }
   });