diff --git a/scripts/mdlinkcheck b/scripts/mdlinkcheck index f5b123a24a..925edc5294 100755 --- a/scripts/mdlinkcheck +++ b/scripts/mdlinkcheck @@ -99,8 +99,14 @@ sub storelink { my $dir = $f; $dir =~ s:([^/]*\z)::; - while($link =~ s:^\.\.\/::) { - $dir =~ s:([^/]*)\/\z::; + if($link =~ s/(^\/)//) { + # link starts with a slash, now removed + $dir = ""; + } + else { + while($link =~ s:^\.\.\/::) { + $dir =~ s:([^/]*)\/\z::; + } } $flink{"./$dir$link"} .= "$f:$line ";