Re: [BUG REPORT] WML 2.0.8, all

[Denis Barbier <nospam@thanx>]

On Sun, Jun 16, 2002 at 12:26:38AM +0200, WMLbug-20020615@leo.0n3.org wrote:
> BUG REPORT
> 
> Package: WML 2.0.8
> Operating System: all
> 
> Problem Description:
> | BUG in wml-sup-path-20-Sep-2000:
> | 
> | o canonpath('.///') returns '/' not './'
> | 
> | see diff below !
> | 
> | regards - Richard

Hi Richard,

> | --- path.src.orig       Sat Jun 15 23:57:26 2002
> | +++ path.src    Sun Jun 16 00:10:32 2002
> | @@ -41,13 +41,13 @@
> |  sub canonpath {
> |      my ($path) = @_;
> |  
> | -    $pathL = '';
> | +    my $pathL = '';
> |      while ($path ne $pathL) {
> |          $pathL = $path;
> |          $path =~ s|//|/|g;

This substitution was wrong, and has been replaced by
             $path =~ s|/+|/|g;
Your latest change was then not needed, but all others have been
applied.

> |          $path =~ s|/\./|/|g;
> | -        $path =~ s|/\.$|/|g;
> | -        $path =~ s|^\./(.)|$1|g;
> | +        $path =~ s|/\.$|/|;
> | +        $path =~ s|^\./([^/])|$1|;
> |          $path =~ s|([^/.][^/.]*)/\.\.||;
> |      }
> |      return $path;

Thanks for your bugreport.

-- 
Denis Barbier
WML Maintainer
______________________________________________________________________
Website META Language (WML)                www.engelschall.com/sw/wml/
Official Support Mailing List                   sw-wml@engelschall.com
Automated List Manager                       majordomo@engelschall.com