--- cvsweb.cgi.orig 2005-11-29 14:34:15.000000000 +0900 +++ cvsweb.cgi 2005-11-29 14:34:15.000000000 +0900 @@ -1,4 +1,4 @@ -#!/usr/bin/perl -wsT +#!/usr/bin/perl -ws # # cvsweb - a CGI interface to CVS trees. # @@ -167,6 +167,7 @@ $doCheckout = ($where =~ /^\/$checkoutMagic/); $where =~ s|^/($checkoutMagic)?||; $where =~ s|/+$||; +$where =~ s|^/+||; ($scriptname = $ENV{'SCRIPT_NAME'}) =~ s|^/?|/|; $scriptname =~ s|/+$||; if ($where) {