Searched refs:optgroup (Results 1 - 4 of 4) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/CGI/t/
H A Dpopup_menu.t16 CGI::popup_menu(-values=>[CGI::optgroup(-values=>["b+"])],-default=>"b+"),
18 <optgroup label="">
20 </optgroup>
22 , "<optgroup> selections work when the default values contain regex characters (RT#49606)");
H A Dform.t135 my $optgroup = optgroup(-name=>'optgroup_name',
139 is($optgroup,
140 qq(<optgroup label="optgroup_name">
143 </optgroup>),
144 'optgroup()');
147 -Values=>[qw/eenie meenie minie/, $optgroup],
156 <optgroup label="optgroup_name">
159 </optgroup>
161 'popup_menu() + optgroup()');
[all...]
H A Dautoescape.t8 use CGI qw/ autoEscape escapeHTML button textfield password_field textarea popup_menu scrolling_list checkbox_group optgroup checkbox radio_group submit image_button button /;
88 optgroup(
107 <optgroup label="optgroup_name" onclick="alert("===> menu group option")">
110 </optgroup>
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/
H A DCGI.pm239 ins label legend noframes noscript object optgroup Q
2593 if (/<optgroup/) {
2619 #### Method: optgroup
2620 # Create a optgroup.
2634 # attribute allows authors to more easily use optgroup without sacrificing
2641 'optgroup' => <<'END_OF_FUNC',
2642 sub optgroup { subroutine
2652 $result = qq/<optgroup label="$name"$other>\n/;
2654 if (/<optgroup/) {
2673 $result .= "</optgroup>";
[all...]

Completed in 604 milliseconds