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

Reply via email to