dynamic page-name publishing for mediawiki

[scpubgit/System-Introspector-Report.git] / t / updater.t

use strictures 1;
use Test::More;

use aliased 'System::Introspector::Report::Updater';

my $updater = Updater->new;

my $content = $updater->merge(
  [],
  [
    { id        => "foo",
      title     => "Foo",
      columns   => [{ key => "a", label => "A" }, { key => "b", label => "B" }],
      rows      => [
        { a => 17, b => 23 },
        { a => 23, b => 17 },
      ],
    },
    { id        => "bar",
      title     => "Bar",
      columns   => [{ key => "a", label => "A" }, { key => "b", label => "B" }],
      rows      => [
        { a => 17, b => 23 },
        { a => 23, b => 17 },
      ],
    },
  ],
);

ok scalar(@$content), 'received content';

done_testing;