Make perlcritic happy

[io-compress-brotli.git] / lib / IO / Compress / Brotli.pm

diff --git a/lib/IO/Compress/Brotli.pm b/lib/IO/Compress/Brotli.pm
index f1b76e219a29dd6dcfa03360a68959caa8c7af33..ed206a9148bc4cd7b170f843475620174e93ada6 100644 (file)
--- a/lib/IO/Compress/Brotli.pm
+++ b/lib/IO/Compress/Brotli.pm
@@ -5,6 +5,8 @@ use strict;
 use warnings;
 use parent qw/Exporter/;
 
+use Carp qw/croak/;
+
 use IO::Uncompress::Brotli;
 
 our @EXPORT = qw/bro/;
@@ -16,7 +18,7 @@ my %BROTLI_ENCODER_MODE = ( generic => 0, text => 1, font => 2 );
 sub mode {
     my ($self, $mode) = @_;
 
-    die "Invalid encoder mode"
+    croak 'Invalid encoder mode'
         unless $BROTLI_ENCODER_MODE{$mode};
 
     _mode($$self, $mode)