From 5f813c15e1d657f2e7bac8d5f5fa6642ac60e7b6 Mon Sep 17 00:00:00 2001
From: Ryan Voots <simcop2387@simcop2387.info>
Date: Thu, 27 Jul 2017 23:17:31 -0700
Subject: [PATCH] More debugging, but not quite right

---
 lib/App/Controller/Eval.pm | 4 ++++
 lib/App/Model/Eval.pm      | 5 +++++
 2 files changed, 9 insertions(+)

diff --git a/lib/App/Controller/Eval.pm b/lib/App/Controller/Eval.pm
index db4885b..41505f4 100644
--- a/lib/App/Controller/Eval.pm
+++ b/lib/App/Controller/Eval.pm
@@ -20,6 +20,10 @@ sub run_eval {
     my ($self) = @_;
     my $data = $self->req->body_params;
 
+
+
+    $self = $self->inactivity_timeout(3600);
+
     my $code = $data->param('code') // '';
     my $language = $data->param('language') // 'perl';
 
diff --git a/lib/App/Model/Eval.pm b/lib/App/Model/Eval.pm
index 209f1c4..10b4c78 100644
--- a/lib/App/Model/Eval.pm
+++ b/lib/App/Model/Eval.pm
@@ -112,6 +112,9 @@ sub async_eval {
                  sequence => $seq, 
                  encoding => "utf8"};
 
+  use Data::Dumper;
+  print Dumper($eval_obj);
+
   my $message = encode_message(eval => $eval_obj);
 
   $reader->($seq, $future);
@@ -162,6 +165,8 @@ sub get_eval_reader {
 
       print Dumper($res, length($buf));
     } while ($res);
+
+    return 0;
   });
 
   return sub {