← Back to branch summary

~ubuntu-branches/ubuntu/maverick/libwww-perl/maverick

« back to all changes in this revision

Viewing changes to t/html/form.t

  • Committer: Bazaar Package Importer
  • Author(s): Nathan Handler
  • Date: 2009-07-09 17:44:48 UTC
  • mfrom: (1.3.2 upstream)
  • Revision ID: james.westby@ubuntu.com-20090709174448-bstu374e2ijr8mpd
Tags: 5.829-1
New upstream release

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/html/form.t
3
3
use strict;
4
4
use Test qw(plan ok);
5
5
 
6
 
plan tests => 126;
 
6
plan tests => 127;
7
7
 
8
8
use HTML::Form;
9
9
 
581
581
EOT
582
582
ok(join(":", $f->find_input("test")->possible_values), "1:2");
583
583
ok(join(":", $f->find_input("test")->other_possible_values), "2");
 
584
 
 
585
@warn = ();
 
586
$f = HTML::Form->parse(<<EOT, "http://www.example.com");
 
587
<form>
 
588
<select id="myselect">
 
589
<option>one</option>
 
590
<option>two</option>
 
591
<option>three</option>
 
592
</select>
 
593
</form>
 
594
EOT
 
595
ok(@warn, 0);