[Catalyst-commits] r8263 - CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk/t

karpet at dev.catalyst.perl.org karpet at dev.catalyst.perl.org
Sat Aug 23 04:24:19 BST 2008


Author: karpet
Date: 2008-08-23 04:24:19 +0100 (Sat, 23 Aug 2008)
New Revision: 8263

Modified:
   CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk/t/01-dbic.t
Log:
update tests for new core api

Modified: CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk/t/01-dbic.t
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk/t/01-dbic.t	2008-08-23 03:22:41 UTC (rev 8262)
+++ CatalystX-CRUD/CatalystX-CRUD-ModelAdapter-DBIC/trunk/t/01-dbic.t	2008-08-23 03:24:19 UTC (rev 8263)
@@ -56,21 +56,21 @@
 # test *_related features
 
 ok( $res = request(
-        POST( '/crud/3/related/cds/1/add', [] ),
-        "/crud/3/related/multitracks/1/add"
+        POST( '/crud/3/cds/1/add', [] ),
+        "/crud/3/multitracks/1/add"
     )
 );
 
-is( $res->headers->{status}, 200, "POST returned OK" );
+is( $res->headers->{status}, 204, "POST returned OK" );
 
 #dump $res;
 
 ok( $res = request(
-        POST( '/crud/3/related/cds/1/remove', [] ),
-        "/crud/3/related/multitracks/1/remove"
+        POST( '/crud/3/cds/1/remove', [] ),
+        "/crud/3/multitracks/1/remove"
     )
 );
 
-is( $res->headers->{status}, 200, "POST returned OK" );
+is( $res->headers->{status}, 204, "POST returned OK" );
 
 #dump $res;




More information about the Catalyst-commits mailing list