Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

replace appearances of startform() in Pod and examples with start_form()

  • Loading branch information...
commit 5de421d891ee34c84354810f33f65f9126d1d95b 1 parent 6b7e9d2
@srezic srezic authored
View
2  examples/clickable_image.cgi
@@ -10,7 +10,7 @@ print <<END;
END
print "Sorry, this isn't very exciting!\n";
-print $query->startform;
+print $query->start_form;
print $query->image_button('picture',"./wilogo.gif");
print "Give me a: ",$query->popup_menu('letter',['A','B','C','D','E','W']),"\n"; #
print "<P>Magnification: ",$query->radio_group('magnification',['1X','2X','4X','20X']),"\n";
View
2  examples/frameset.cgi
@@ -54,7 +54,7 @@ sub print_end {
sub print_query {
$script_name = $query->script_name;
print "<H1>Frameset Query</H1>\n";
- print $query->startform(-action=>"$script_name/response",-TARGET=>"response");
+ print $query->start_form(-action=>"$script_name/response",-TARGET=>"response");
print "What's your name? ",$query->textfield('name');
print "<P>What's the combination?<P>",
$query->checkbox_group(-name=>'words',
View
2  examples/internal_links.cgi
@@ -17,7 +17,7 @@ print "<A NAME=\"start\"></A>\n"; # an anchor point at the top
# pick a default starting value;
$query->param('amenu','FOO1') unless $query->param('amenu');
-print $query->startform;
+print $query->start_form;
print $query->popup_menu('amenu',[('FOO1'..'FOO9')]);
print $query->submit,$query->endform;
View
4 examples/multiple_forms.cgi
@@ -8,7 +8,7 @@ print $query->start_html('Multiple Forms');
print "<H1>Multiple Forms</H1>\n";
# Print the first form
-print $query->startform;
+print $query->start_form;
$name = $query->remote_user || 'anonymous@' . $query->remote_host;
print "What's your name? ",$query->textfield('name',$name,50);
@@ -22,7 +22,7 @@ print $query->endform;
# Print the second form
print "<HR>\n";
-print $query->startform;
+print $query->start_form;
print "Some radio buttons: ",$query->radio_group('radio buttons',
[qw{one two three four five}],'three'),"\n";
print "<P>What's the password? ",$query->password_field('pass','secret');
View
2  examples/popup.cgi
@@ -8,7 +8,7 @@ print $query->start_html('Popup Window');
if (!$query->param) {
print "<H1>Ask your Question</H1>\n";
- print $query->startform(-target=>'_new');
+ print $query->start_form(-target=>'_new');
print "What's your name? ",$query->textfield('name');
print "<P>What's the combination?<P>",
$query->checkbox_group(-name=>'words',
View
2  lib/CGI.pm
@@ -7269,7 +7269,7 @@ start_html() method provides a convenient way to create this section.
Similarly, you can create a form that checks itself over for
consistency and alerts the user if some essential value is missing by
creating it this way:
- print startform(-onSubmit=>"validateMe(this)");
+ print start_form(-onSubmit=>"validateMe(this)");
See the javascript.cgi script for a demonstration of how this all
works.
Please sign in to comment.
Something went wrong with that request. Please try again.