clkao

t/44-encodings.t               (Wstat: 2816 Tests: 320 Failed: 11)
  Failed tests:  40-42, 44-46, 49-51, 300-301
  Non-zero exit status: 11
t/65-old_cookies.t             (Wstat: 512 Tests: 8 Failed: 2)
  Failed tests:  6, 8
  Non-zero exit status: 2
t/76-imap-ical.t               (Wstat: 65280 Tests: 39 Failed: 8)
  Failed tests:  29-33, 37-39
  Non-zero exit status: 255
  Parse errors: Bad plan.  You planned 75 tests but ran 39.

clkao

t/44-encodings.t               (Wstat: 2816 Tests: 320 Failed: 11)
  Failed tests:  40-42, 44-46, 49-51, 300-301
  Non-zero exit status: 11
t/65-old_cookies.t             (Wstat: 512 Tests: 8 Failed: 2)
  Failed tests:  6, 8
  Non-zero exit status: 2
t/76-imap-ical.t               (Wstat: 65280 Tests: 39 Failed: 8)
  Failed tests:  29-33, 37-39
  Non-zero exit status: 255
  Parse errors: Bad plan.  You planned 75 tests but ran 39.

clkao

t/68-repeating.t .. 1/82 Can't call method "update_next_repeat" on an undefined value at /Users/clkao/git/bps-private/hiveminder/lib/BTDT/Model/Task.pm line 2475.

clkao

diff --git a/lib/Plack/Middleware/Session.pm b/lib/Plack/Middleware/Session.pm
index dab15cb..524dcf7 100644
--- a/lib/Plack/Middleware/Session.pm
+++ b/lib/Plack/Middleware/Session.pm
@@ -55,7 +55,7 @@ sub call {
     $self->response_cb($res, sub {
         my $res = Plack::Response->new(@{$_[0]});
         $env->{'plack.session'}->finalize( $res );
-        @{$_[0]} = @{$res->finalize};
+        $res;

clkao

diff --git a/lib/Finance/GeniusTrader/Graphics/Object/BuySellArrows.pm b/lib/Finance/GeniusTrader/Graphics/Object/BuySellArrows.pm
index a79f689..ee9a370 100644
--- a/lib/Finance/GeniusTrader/Graphics/Object/BuySellArrows.pm
+++ b/lib/Finance/GeniusTrader/Graphics/Object/BuySellArrows.pm
@@ -17,6 +17,7 @@ use Finance::GeniusTrader::Graphics::Object;
 use Finance::GeniusTrader::Graphics::Driver;
 use Finance::GeniusTrader::Graphics::Tools qw(:color);
 use Finance::GeniusTrader::Conf;
+use List::Util qw(min max);
 

clkao

use strict;

use Plack::Builder;
use File::Basename qw(dirname);
use Cwd qw(abs_path);

my $handler = sub {
    return [ 404, [ "Content-Type" => "text/plain" ], [ "Not Found" ] ];
};