use strict;
use warnings;
use Test::More tests => 3;
use Kwiki::Test;
use lib '../lib';
my $kwiki = Kwiki::Test->new->init(['Kwiki::DatedAnnounce']);
my $time = time;
my $duration = 2;
$time = $time + $duration;
my $content =<<"EOF";
=== Hello
.dated
datespec: $time $duration
=== Secret
.dated
EOF
my $expected_output1 =<<"EOF";
Hello
Secret
EOF
my $expected_output2 =<<"EOF";
Hello
EOF
my $formatter = $kwiki->hub->formatter;
my $output = $formatter->text_to_html($content);
is($output, $expected_output2, 'prior to date no show');
sleep 3;
$output = $formatter->text_to_html($content);
is($output, $expected_output1, 'in date window, show');
sleep 3;
$output = $formatter->text_to_html($content);
is($output, $expected_output2, 'after date window, no show');
$kwiki->cleanup;