Parent Directory | Revision Log | Patch
revision 1.13 by gmorin, Sat Jan 26 15:21:11 2002 UTC | revision 1.14 by gael, Fri Feb 8 23:54:07 2002 UTC | |
---|---|---|
# | Line 526 sub FindStowMember { | Line 526 sub FindStowMember { |
526 | while (@path) { | while (@path) { |
527 | $x = shift(@path); | $x = shift(@path); |
528 | if ($x eq '..') { | if ($x eq '..') { |
529 | pop(@x); | # ignore if /, since /.. is / |
530 | return '' unless @x; | pop(@x) if scalar(@x) > 1; |
531 | } elsif ($x) { | } elsif ($x ne '.') { |
532 | push(@x, $x); | push(@x, $x); |
533 | } | } |
534 | } | } |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |