Changeset 816 for trunk/UnitTestContrib/test/unit/FormDefTests.pm

Timestamp:

11/19/08 19:11:33 (4 years ago)

Author:

CrawfordCurrie

Message:

Item175: ported unit tests to new namespace. They all pass.

File:

• trunk/UnitTestContrib/test/unit/FormDefTests.pm (modified) (8 diffs)

trunk/UnitTestContrib/test/unit/FormDefTests.pm

@@ -3 +3 @@
 package FormDefTests;
 
-use base qw(TWikiFnTestCase);
+use base qw(FoswikiFnTestCase);
 
-use TWiki;
-use TWiki::Form;
+use Foswiki;
+use Foswiki::Form;
 use strict;
 use Assert;
@@ -19 +19 @@
 | Date | date | 30 |
 FORM
-    my $def = TWiki::Form->new($this->{twiki}, $this->{test_web}, 'TestForm');
+    my $def = Foswiki::Form->new($this->{twiki}, $this->{test_web}, 'TestForm');
 
     $this->assert_equals(1, scalar @{$def->getFields()});
@@ -42 +42 @@
 | Checky Egg | checkbox | 1      | 1,2,3,4   | Blip      |              |
 FORM
-    my $def = new TWiki::Form($this->{twiki}, $this->{test_web}, 'TestForm');
+    my $def = new Foswiki::Form($this->{twiki}, $this->{test_web}, 'TestForm');
 
     $this->assert_equals(2, scalar @{$def->getFields()});
@@ -82 +82 @@
 | Age |
 FORM
-    my $def = new TWiki::Form($this->{twiki}, $this->{test_web}, 'TestForm');
+    my $def = new Foswiki::Form($this->{twiki}, $this->{test_web}, 'TestForm');
 
     $this->assert_equals(1, scalar @{$def->getFields()});
@@ -111 +111 @@
 | Age |
 FORM
-    my $def = new TWiki::Form($this->{twiki}, $this->{test_web}, 'TestForm');
+    my $def = new Foswiki::Form($this->{twiki}, $this->{test_web}, 'TestForm');
 
     $this->assert_equals(1, scalar @{$def->getFields()});
@@ -139 +139 @@
 | Beauty |
 FORM
-    my $def = new TWiki::Form($this->{twiki}, $this->{test_web}, 'TestForm');
+    my $def = new Foswiki::Form($this->{twiki}, $this->{test_web}, 'TestForm');
 
     $this->assert_equals(1, scalar @{$def->getFields()});
@@ -164 +164 @@
 FORM
 
-    my $def = new TWiki::Form($this->{twiki}, $this->{test_web}, 'TestForm');
+    my $def = new Foswiki::Form($this->{twiki}, $this->{test_web}, 'TestForm');
 
     my $f = $def->getField('Ecks');
@@ -186 +186 @@
       $this->{twiki}->{store}->readTopic(
           undef, $this->{test_web}, 'SplodgeOne');
-    my $form = new TWiki::Form(
+    my $form = new Foswiki::Form(
         $this->{twiki}, $this->{test_web}, 'NonExistantForm', $meta);
     my $f = $form->getField('Ecks');