diff options
author | Lukas Larsson <lukas@erlang.org> | 2022-04-29 09:13:41 +0200 |
---|---|---|
committer | Lukas Larsson <lukas@erlang.org> | 2022-04-29 09:18:29 +0200 |
commit | 89d449f81b04e05ddcbf07f0c827badd5d25d20a (patch) | |
tree | 7140c018bfd447b8577cf822e49bea0119093317 /scripts/otp_html_check | |
parent | 49407040b676e935bdf495085210fd3fa25e0bc1 (diff) | |
download | erlang-89d449f81b04e05ddcbf07f0c827badd5d25d20a.tar.gz |
howto: Expand on how to validate documentation
Diffstat (limited to 'scripts/otp_html_check')
-rwxr-xr-x | scripts/otp_html_check | 16 |
1 files changed, 7 insertions, 9 deletions
diff --git a/scripts/otp_html_check b/scripts/otp_html_check index 2b1044ef91..3b9df7f8c6 100755 --- a/scripts/otp_html_check +++ b/scripts/otp_html_check @@ -371,15 +371,6 @@ sub expand_link { # ########################################################################### -if (keys %missing) { - print "\n\n\n**** Broken links\n\n"; - foreach (sort keys %missing) { - my ($page,$link) = split($;); - print qq(Broken Link: $page -> "$link"\n); - } -} - - # Entries in %pages that has the value 0 is not visited if (keys %pages) { print "\n\n\n**** Files not used (that I can see)\n\n"; @@ -396,6 +387,13 @@ if (keys %pages) { } } +if (keys %missing) { + print "\n\n\n**** Broken links\n\n"; + foreach (sort keys %missing) { + my ($page,$link) = split($;); + print qq(Broken Link: $page -> "$link"\n); + } +} # Remove all references that has a matching NAME=.... map {delete $anchor_refs{$_}} keys %anchor_defs; |