Don't resolve links to self forever

diff --git a/web-lib-funcs.pl b/web-lib-funcs.pl
index 92dbea7..cdadc98 100755 (executable)
--- a/web-lib-funcs.pl
+++ b/web-lib-funcs.pl
@@ -6478,7 +6478,11 @@ shift(@p);
 for(my $i=0; $i<@p; $i++) {
        my $sofar = "/".join("/", @p[0..$i]);
        my $lnk = readlink($sofar);
-       if ($lnk =~ /^\//) {
+       if ($lnk eq $sofar) {
+               # Link to itself! Cannot do anything more really ..
+               last;
+               }
+       elsif ($lnk =~ /^\//) {
                # Link is absolute..
                return &resolve_links($lnk."/".join("/", @p[$i+1 .. $#p]));
                }