X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fstore%2Fsqlite.t;fp=t%2Fstore%2Fsqlite.t;h=a31f1c071e9ea7b3ced9f2a2e553e2299392b81b;hb=6df0509024f4a9c2c545615b6648ca1365689cfc;hp=dca7489fd876e94f2ffb797f54f2b832db59b381;hpb=02ea620ecbee068e5a138323eccbc8327b90501c;p=catagits%2FApp-IdiotBox.git diff --git a/t/store/sqlite.t b/t/store/sqlite.t index dca7489..a31f1c0 100644 --- a/t/store/sqlite.t +++ b/t/store/sqlite.t @@ -2,14 +2,15 @@ use strict; use warnings FATAL => 'all'; use App::IdiotBox::Store::SQLite; +use App::IdiotBox; use Devel::Dwarn; -my $ib = {}; +my $ib = App::IdiotBox->new; App::IdiotBox::Store::SQLite->bind($ib); -#Dwarn [ $ib->{recent_announcements}->flatten ]; +Dwarn [ $ib->{recent_announcements}->flatten ]; my $bucket = DwarnS $ib->{buckets}->get({ slug => 'opw2010'}); #Dwarn [ $bucket->{videos}->flatten ];