Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

fixed dangling ? problem again

  • Loading branch information...
commit 1b6d121a244f58741a487c5d6dde0bc2c5a00674 1 parent 5c94f21
lstein authored
Showing with 7 additions and 4 deletions.
  1. +4 −4 CGI.pm
  2. +3 −0  Changes
View
8 CGI.pm
@@ -18,8 +18,8 @@ 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.194 2005-12-06 22:12:56 lstein Exp $';
-$CGI::VERSION='3.14';
+$CGI::revision = '$Id: CGI.pm,v 1.195 2005-12-07 22:18:27 lstein Exp $';
+$CGI::VERSION='3.15';
# HARD-CODED LOCATION FOR FILE UPLOAD TEMPORARY FILES.
# UNCOMMENT THIS ONLY IF YOU KNOW WHAT YOU'RE DOING.
@@ -2631,8 +2631,8 @@ sub url {
undef $path if $rewrite_in_use && $rewrite; # path not valid when rewriting active
my $uri = $rewrite && $request_uri ? $request_uri : $script_name;
- $uri =~ s/\?.+$// if defined $query_str;
- $uri =~ s/$path$// if defined $path; # remove path from URI
+ $uri =~ s/\?.*$//; # remove query string
+ $uri =~ s/$path$// if defined $path; # remove path
if ($full) {
my $protocol = $self->protocol();
View
3  Changes
@@ -1,3 +1,6 @@
+ Version 3.15 Wed Dec 7 15:13:22 EST 2005
+ 1. Remove extraneous "?" from self_url() when URI contains a ? but no query string.
+
Version 3.14 Tue Dec 6 17:12:03 EST 2005
1. Fixed broken scrolling_list() select attribute.
Please sign in to comment.
Something went wrong with that request. Please try again.