- Added some more tests to the suite.

- Fixed the test skeleton

docs/changelog/7.x.x.txt

@@ -1,6 +1,8 @@
 7.0.5
  - Added a --skipDelete option to upgrade.pl
  - rfe: Approvers don't need to approve own changes
+ - Added some more tests to the suite.
+ - Fixed the test skeleton
 
 
 7.0.4

t/AdSpace.t

@@ -0,0 +1,30 @@
+#-------------------------------------------------------------------
+# WebGUI is Copyright 2001-2006 Plain Black Corporation.
+#-------------------------------------------------------------------
+# Please read the legal notices (docs/legal.txt) and the license
+# (docs/license.txt) that came with this distribution before using
+# this software.
+#-------------------------------------------------------------------
+# http://www.plainblack.com                     info@plainblack.com
+#-------------------------------------------------------------------
+
+use FindBin;
+use strict;
+use lib "$FindBin::Bin/lib";
+use WebGUI::Test;
+use WebGUI::Session;
+use WebGUI::AdSpace;
+use Test::More tests => 3; # increment this value for each test you create
+
+my $session = WebGUI::Test->session;
+
+my $adSpace = WebGUI::AdSpace->create($session, {name=>"Alfred"});
+
+my $data = $session->db->quickHashRef("select adSpaceId, name from adSpace where adSpaceId=?",[$adSpace->getId]);
+
+ok(exists $data->{adSpaceId}, "create()");
+is($data->{name}, $adSpace->get("name"), "get()");
+is($data->{adSpaceId}, $adSpace->getId, "getId()");
+
+
+

t/_test.skeleton

@@ -11,10 +11,14 @@
 use FindBin;
 use strict;
 use lib "$FindBin::Bin/lib";
-
+use WebGUI::Test;
 use WebGUI::Session;
+
+# load your modules here
+
 use Test::More tests => 1; # increment this value for each test you create
 
 my $session = WebGUI::Test->session;
 
 # put your tests here
+