charset: support input of multiple row skips
[sheet.git] / browser.plp
index bdde90e3401d86467859776b2a090efce443790b..0d4d4e7c8ed17e7da6e8567f41db20164ac0af84 100644 (file)
@@ -96,11 +96,13 @@ given ($get{usage} // 'wm') {
                # none
        }
        when (!m{ \A [a-z]\w+ (?:/\d[\d-]*\d)? \z }x) {
-               printf "<p>Invalid browser usage data request: <em>%s</em>",
-                       'identifier must be alphanumeric name or <q>0</q>';
+               Alert([
+                       'Invalid browser usage data request',
+                       'Identifier must be alphanumeric name or <q>0</q>.',
+               ]);
        }
        $canihas = do "data/browser/usage-$_.inc.pl" or do {
-               printf "<p>Browser usage data not found: <em>%s</em>", $@ || $!;
+               Alert('Browser usage data not found', $@ || $!);
                break;
        };
        $usage = $_;