[Bast-commits] r9632 - ironman/IronMan-Schema/trunk/t

idn at dev.catalyst.perl.org idn at dev.catalyst.perl.org
Sat Jul 10 09:41:54 GMT 2010


Author: idn
Date: 2010-07-10 10:41:54 +0100 (Sat, 10 Jul 2010)
New Revision: 9632

Modified:
   ironman/IronMan-Schema/trunk/t/04_resultset_post.t
Log:
Populate data before doing checks

Modified: ironman/IronMan-Schema/trunk/t/04_resultset_post.t
===================================================================
--- ironman/IronMan-Schema/trunk/t/04_resultset_post.t	2010-07-08 20:59:45 UTC (rev 9631)
+++ ironman/IronMan-Schema/trunk/t/04_resultset_post.t	2010-07-10 09:41:54 UTC (rev 9632)
@@ -15,6 +15,21 @@
 my $feed = $schema->resultset('Feed');
 $feed = $feed->next;
 
+$schema->resultset('Post')->populate( [ {
+    feed_id          => $feed->id,
+    author           => "Dave Cross",
+    tags             => "",
+    url              => "http://blogs.dave.org.uk/",
+    title            => "Dave's blog",
+    posted_on        => DateTime->now,
+    summary          => "Dave's blog posts go here",
+    summary_filtered => "Dave's blog posts go here",
+    body             => "More detail goes here",
+    body_filtered    => "More detail goes here",
+} ] );
+
+
+
 # Create a DateTime for right now.
 my $dt = DateTime->now;
 




More information about the Bast-commits mailing list