On Thu, 05 Aug 2010 16:37:52 +0200, Dean Hamstead <d...@fragfest.com.au>
wrote:
I have discovered the source of this bug (no i havent spent the last 6
months on it)
in sub crack_url
...snip.8<...
# This is used as the key in to the hash of configured repositories.
# It may be the empty string, in which case the action to run is
# the 'list repositories' action.
if($location eq $filename) {
$repo = ''; # No repo, show repo list
$action = 'list';
} else {
...snip.8<...
this $location eq $filename doesnt factor in superfluous trailing
slashes. for example /var/www/svn/repos/svnweb is equal to
/var/www/svn/repos/svnweb/ even though perls |eq| function doesnt agree
with that.
If I'm not mistaken, that should be trivial to solve by adding "use Cwd
qw(realpath);" at the top and changing the condition of that "if" to:
if(realpath($location) eq realpath($filename)) {
HTH,
--
Esteban
--
To UNSUBSCRIBE, email to debian-bugs-dist-requ...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org