From 974ab6d89beccc308a6baa8ae5d31ef0d653d41f Mon Sep 17 00:00:00 2001
From: Lukas Mueller <lam87@cornell.edu>
Date: Tue, 17 Dec 2013 22:47:35 -0500
Subject: [PATCH] remove mod_perl limitation. Its not true.

---
 lib/CXGN/Tools/Run.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/CXGN/Tools/Run.pm b/lib/CXGN/Tools/Run.pm
index 5d8a751..ef07618 100644
--- a/lib/CXGN/Tools/Run.pm
+++ b/lib/CXGN/Tools/Run.pm
@@ -187,7 +187,7 @@ sub run {
   my ($class,@args) = @_;
   my $self = bless {},$class;
 
-  $ENV{MOD_PERL} and croak "CXGN::Tools::Run->run() not functional under mod_perl";
+  #$ENV{MOD_PERL} and croak "CXGN::Tools::Run->run() not functional under mod_perl";
 
   my $options = $self->_pop_options( \@args );
   $self->_process_common_options( $options );
@@ -207,7 +207,7 @@ sub run {
       #write die messages to a file for later retrieval by interested
       #parties, chiefly the parent process if this is a cluster job
       $self->_write_die( $@ );
-      croak $self->_format_error_message( $@ );
+    croak $self->_format_error_message( $@ );
     }
   }
   $self->_end_time(time);
@@ -259,7 +259,7 @@ sub run_async {
   my ($class,@args) = @_;
   my $self = bless {},$class;
 
-  $ENV{MOD_PERL} and croak "CXGN::Tools::Run->run_async() not functional under mod_perl";
+  #$ENV{MOD_PERL} and croak "CXGN::Tools::Run->run_async() not functional under mod_perl";
 
   my $options = $self->_pop_options( \@args );
   $self->_process_common_options( $options );
-- 
2.11.4.GIT