move to new DBIxDS code
[catagits/App-IdiotBox.git] / t / store / sqlite.t
index dca7489..a31f1c0 100644 (file)
@@ -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 ];