diff options
| author | Lukas Larsson <lukas@erlang.org> | 2020-04-17 17:00:05 +0200 |
|---|---|---|
| committer | Lukas Larsson <lukas@erlang.org> | 2020-04-17 17:00:26 +0200 |
| commit | 548dc97317baae1acf6deaa5f9b879209db69551 (patch) | |
| tree | a00a7b13c6ca1bd23167d01e4a8b0f65f45f777a /scripts | |
| parent | 36071d7cbff6163d4d5d8ce0b8e9936146e76a38 (diff) | |
| download | erlang-548dc97317baae1acf6deaa5f9b879209db69551.tar.gz | |
docs: In link check trip everything after ?
Diffstat (limited to 'scripts')
| -rwxr-xr-x | scripts/otp_html_check | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/otp_html_check b/scripts/otp_html_check index 23805b5789..62d5b47edd 100755 --- a/scripts/otp_html_check +++ b/scripts/otp_html_check @@ -277,7 +277,6 @@ sub normalize_link { } return $link if $link =~ /^\w{3,10}:/i; # mailto: http: ..... - return $link if $link =~ /\?/i; # Contains arguments to CGI $link =~ s/%([\da-fA-F]{2})/chr(hex($1))/eg; # Translate hex to char @@ -328,6 +327,7 @@ sub normalize_link { $link =~ s&(/\.)+$&&; # Remove ending slash dot "/." $link =~ s&(/\.)+/&/&g; # Remove all slash dot slash "/./" $link =~ s&/+$&&; # Remove ending slashes + $link =~ s&\?.*$&&; # Remove any query parameters # Remove a real directory part followed by ".." |