]>
iEval git - app-lastmsg.git/blob - t/App-Lastmsg.t
5 use Test
::More tests
=> 2;
6 BEGIN { use_ok
('App::Lastmsg') };
9 no warnings
'redefine';
10 *App
::Lastmsg
::format_time
= sub { shift };
15 open my $fh, '>', \
$out or die "$!";
16 $App::Lastmsg
::OUTPUT_FILEHANDLE
= $fh;
20 is
$out, <<'EOF', 'output is correct';
21 user2 user2@example.org 1483182600
22 user1 user1@example.com 1483105440
This page took 0.044969 seconds and 5 git commands to generate.