Subversion Repositories DevTools

Rev

Rev 345 | Rev 363 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 345 Rev 361
Line 6186... Line 6186...
6186 
        #
 6186 
        #
6187 
        unless ( $name =~ m~\$\(GBE_.+\)~ )
 6187 
        unless ( $name =~ m~\$\(GBE_.+\)~ )
6188 
        {
 6188 
        {
6189 
            $name =~ s~\$~\$\$~g;
 6189 
            $name =~ s~\$~\$\$~g;
6190 
            $name =~ s~ ~\\ ~g;
 6190 
            $name =~ s~ ~\\ ~g;
- 
 
 6191 
            $name =~ s~,~\$(comma)~g;
6191 
        }
 6192 
        }
6192 
 
 6193 
 
6193 
        if ( ! /^--(.*)/ )
 6194 
        if ( ! /^--(.*)/ )
6194 
        {
 6195 
        {
6195 
            $basename = StripDir( $name );
 6196 
            $basename = StripDir( $name );