From d28fe9e9d3799aa5eb32801d8fa511e2bbdc5c6f Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Wed, 3 Oct 2012 18:36:06 -0500
Subject: remove debugging code

---
 lib/Text/Handlebars/Compiler.pm      | 15 ---------------
 lib/Text/Xslate/Syntax/Handlebars.pm | 33 ---------------------------------
 2 files changed, 48 deletions(-)

(limited to 'lib')

diff --git a/lib/Text/Handlebars/Compiler.pm b/lib/Text/Handlebars/Compiler.pm
index 2fc7422..ae1738b 100644
--- a/lib/Text/Handlebars/Compiler.pm
+++ b/lib/Text/Handlebars/Compiler.pm
@@ -31,21 +31,6 @@ sub _generate_include {
     return $self->SUPER::_generate_include($node);
 }
 
-if (0) {
-    our $_recursing;
-    around compile_ast => sub {
-        my $orig = shift;
-        my $self = shift;
-
-        my @ast = do {
-            local $_recursing = 1;
-            $self->$orig(@_);
-        };
-        use Data::Dump; ddx(\@ast) unless $_recursing;
-        return @ast;
-    };
-}
-
 __PACKAGE__->meta->make_immutable;
 no Any::Moose;
 
diff --git a/lib/Text/Xslate/Syntax/Handlebars.pm b/lib/Text/Xslate/Syntax/Handlebars.pm
index 1be7dff..c857a47 100644
--- a/lib/Text/Xslate/Syntax/Handlebars.pm
+++ b/lib/Text/Xslate/Syntax/Handlebars.pm
@@ -474,39 +474,6 @@ sub print_raw {
     return $self->print(@_)->clone(id => 'print_raw');
 }
 
-if (0) {
-    require Devel::STDERR::Indent;
-    my @stack;
-    for my $method (qw(statements statement expression_list expression)) {
-        before $method => sub {
-            warn "entering $method";
-            push @stack, Devel::STDERR::Indent::indent();
-        };
-        after $method => sub {
-            pop @stack;
-            warn "leaving $method";
-        };
-    }
-    after advance => sub {
-        my $self = shift;
-        warn $self->token->id;
-    };
-    around parse => sub {
-        my $orig = shift;
-        my $self = shift;
-        my $ast = $self->$orig(@_);
-        use Data::Dump; ddx($ast);
-        return $ast;
-    };
-    around preprocess => sub {
-        my $orig = shift;
-        my $self = shift;
-        my $code = $self->$orig(@_);
-        warn $code;
-        return $code;
-    };
-}
-
 __PACKAGE__->meta->make_immutable;
 no Any::Moose;
 
-- 
cgit v1.2.3-54-g00ecf