Changeset 19 in text-formbuilder for trunk/t

Timestamp:

11/09/04 12:47:12 (20 years ago)

Author:

peter

Message:

more documentation
added automagic parse method; moved old parse($file) method to parse_file

File:

• trunk/t/Text-FormBuilder.t (modified) (2 diffs)

trunk/t/Text-FormBuilder.t

@@ -6 +6 @@
 # change 'tests => 1' to 'tests => last_test_to_print';
 
-use Test::More tests => 4;
+use Test::More tests => 6;
 BEGIN { use_ok('Text::FormBuilder'); };
 
@@ -16 +16 @@
 my $p = Text::FormBuilder->new;
 isa_ok($p, 'Text::FormBuilder', 'new parser');
-isa_ok($p->parse_text('')->build->form, 'CGI::FormBuilder',  'generated CGI::FormBuilder object');
+isa_ok($p->parse_text('')->build->form, 'CGI::FormBuilder',  'generated CGI::FormBuilder object (build->form)');
+isa_ok($p->parse_text('')->form,        'CGI::FormBuilder',  'generated CGI::FormBuilder object (form)');
 
-my $p2 = Text::FormBuilder->parse_text('');
-isa_ok($p2, 'Text::FormBuilder', 'new parser (from parse_text as class method)');
+$p = Text::FormBuilder->parse_text('');
+isa_ok($p, 'Text::FormBuilder', 'new parser (from parse_text as class method)');
+
+$p = Text::FormBuilder->parse(\'');
+isa_ok($p, 'Text::FormBuilder', 'new parser (from parse as class method)');
+