[Jifty-commit] r3569 - jifty/branches/trimclient/lib/Jifty/View/Declare

jifty-commit at lists.jifty.org jifty-commit at lists.jifty.org
Tue Jun 26 12:29:26 EDT 2007


Author: clkao
Date: Tue Jun 26 12:29:26 2007
New Revision: 3569

Modified:
   jifty/branches/trimclient/lib/Jifty/View/Declare/Compile.pm

Log:
Info about our B::Deparse.

Modified: jifty/branches/trimclient/lib/Jifty/View/Declare/Compile.pm
==============================================================================
--- jifty/branches/trimclient/lib/Jifty/View/Declare/Compile.pm	(original)
+++ jifty/branches/trimclient/lib/Jifty/View/Declare/Compile.pm	Tue Jun 26 12:29:26 2007
@@ -1,26 +1,3 @@
-# XXX: unfortunately this requires some patches to B::Deparse so it
-# won't work out of the box for you
-
-use B::Deparse;
-package B::Deparse;
-
-my $oldbinop;
-BEGIN {
-    $oldbinop = B::Deparse->can('binop');
-}
-
-# nothing yet
-sub binop {
-    my $self = shift;
-    my $ret = $oldbinop->($self, @_);
-    if ($_[2] eq '=') {
-    }
-    return $ret;
-
-}
-
-sub pp_leaveloop { shift->loop_common(@_, "") }
-
 package Jifty::View::Declare::Compile;
 use strict;
 use base 'B::Deparse';
@@ -35,7 +12,10 @@
          CVf_METHOD CVf_LOCKED CVf_LVALUE CVf_ASSERTION
 	 PMf_KEEP PMf_GLOBAL PMf_CONTINUE PMf_EVAL PMf_ONCE PMf_SKIPWHITE
 	 PMf_MULTILINE PMf_SINGLELINE PMf_FOLD PMf_EXTENDED);
-
+BEGIN {
+    die "You need a custom version of B::Deparse from http://svn.jifty.org/svn/jifty.org/B/"
+        unless B::Deparse->can('e_method')
+}
 sub is_scope { goto \&B::Deparse::is_scope }
 sub is_state { goto \&B::Deparse::is_state }
 sub null { goto \&B::Deparse::null }


More information about the Jifty-commit mailing list