[Jifty-commit] r3032 - in jifty/trunk: lib/Jifty

[jifty-commit at lists.jifty.org]

Author: jesse
Date: Mon Mar 19 21:30:44 2007
New Revision: 3032

Modified:
   jifty/trunk/   (props changed)
   jifty/trunk/lib/Jifty/TestServer.pm

Log:
 r53640 at pinglin:  jesse | 2007-03-19 21:29:02 -0400
 * When running coverage, don't use Class::Accessor::Named as it uses Hook::LexWrap


Modified: jifty/trunk/lib/Jifty/TestServer.pm
==============================================================================
--- jifty/trunk/lib/Jifty/TestServer.pm	(original)
+++ jifty/trunk/lib/Jifty/TestServer.pm	Mon Mar 19 21:30:44 2007
@@ -77,9 +77,12 @@
 
     my @extra;
     if (my $profile_file = $ENV{JIFTY_TESTSERVER_PROFILE}) {
-        push @extra, '-d:DProf', '-MClass::Accessor::Named';
+        push @extra, '-d:DProf';
         $ENV{"PERL_DPROF_OUT_FILE_NAME"} = $profile_file;
     }
+    if ($ENV{JIFTY_TESTSERVER_NAMED_ACCESSOR}) {
+        push @extra, '-MClass::Accessor::Named';
+    }
     if (my $coverage = $ENV{JIFTY_TESTSERVER_COVERAGE}) {
         push @extra, '-MDevel::Cover'.($coverage =~ m/,/ ? "=$coverage" : '');
     }