sc: apply html paging to 404 errors
authorMischa POSLAWSKY <perl@shiar.org>
Sat, 16 Oct 2021 15:50:38 +0000 (17:50 +0200)
committerMischa POSLAWSKY <perl@shiar.org>
Mon, 6 Dec 2021 11:07:29 +0000 (12:07 +0100)
sc.plp

diff --git a/sc.plp b/sc.plp
index c969185d560e93b62cdf9ba050f8a15ae36f13cc..042719abfc79cab58320c5e1393abf11d004acb5 100644 (file)
--- a/sc.plp
+++ b/sc.plp
@@ -24,8 +24,8 @@ my %scvers = (
 
 $Request ||= 'bw';
 $Request = 'lotv' if $Request eq '2';
-my %scver = %{ $scvers{$Request} }
-       or Abort("Requested version $Request not available", '404 unknown');
+my %scver = %{ $scvers{$Request} // {} }
+       or Html(), Abort("Requested version <q>$Request</q> not available", '404 request not found');
 
 my $datafile = "sc-units-$Request.inc.pl";