Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

release 3.05

  • Loading branch information...
commit e62cbd9674aa03b97fc7879abe4071a316a793b0 1 parent 5e735c3
lstein authored
Showing with 5 additions and 4 deletions.
  1. +2 −2 CGI.pm
  2. +3 −2 cgi_docs.html
View
4 CGI.pm
@@ -18,7 +18,7 @@ use Carp 'croak';
# The most recent version and complete docs are available at:
# http://stein.cshl.org/WWW/software/CGI/
-$CGI::revision = '$Id: CGI.pm,v 1.164 2004-04-05 17:38:12 lstein Exp $';
+$CGI::revision = '$Id: CGI.pm,v 1.165 2004-04-12 20:37:26 lstein Exp $';
$CGI::VERSION=3.05;
# HARD-CODED LOCATION FOR FILE UPLOAD TEMPORARY FILES.
@@ -1718,7 +1718,7 @@ sub startform {
}
else {
$action = $self->escapeHTML($self->url(-absolute=>1,-path=>1));
- if (length($ENV{QUERY_STRING})>0) {
+ if (exists $ENV{QUERY_STRING} && length($ENV{QUERY_STRING})>0) {
$action .= "?".$self->escapeHTML($ENV{QUERY_STRING},1);
}
}
View
5 cgi_docs.html
@@ -7,7 +7,7 @@
<BODY bgcolor="#FFFFFF">
<H1><IMG SRC="examples/dna.small.gif" ALT="[logo]">
CGI.pm - a Perl5 CGI Library</H1>
-Version 3.05, XX/XX/XXXX, L. Stein
+Version 3.05, 04/12/2004, L. Stein
<p>
<H2>Abstract</H2> This perl 5 library uses objects to create Web
@@ -4899,6 +4899,7 @@
<H2><A NAME="new">Revision History</A></H2>
<h3>Version 3.05</h3>
<ol>
+ <li>Fixed uninitialized variable warning on start_form() when running from command line.
<li>Fixed CGI::_set_attributes so that attributes with a - are handled correctly.
<li>Fixed CGI::Carp::die() so as to avoid problems from _longmess() clobbering @_.
<li>If HTTP_X_FORWARDED_HOST is defined (i.e. running under a proxy), the
@@ -6058,6 +6059,6 @@
<a href="http://www.cshl.org/">Cold Spring Harbor Laboratory</a></ADDRESS>
<P>
<!-- hhmts start -->
-Last modified: Mon Apr 5 13:37:35 EDT 2004
+Last modified: Mon Apr 12 16:36:49 EDT 2004
<!-- hhmts end -->
</BODY> </HTML>
Please sign in to comment.
Something went wrong with that request. Please try again.