X-Git-Url: http://git.ieval.ro/?p=io-compress-brotli.git;a=blobdiff_plain;f=lib%2FIO%2FCompress%2FBrotli.pm;fp=lib%2FIO%2FCompress%2FBrotli.pm;h=ed206a9148bc4cd7b170f843475620174e93ada6;hp=f1b76e219a29dd6dcfa03360a68959caa8c7af33;hb=f108816bf7a6803c81d055b35b076b116506e6f0;hpb=799b2a343f40ccc586481aa7b269da5f0abf513f diff --git a/lib/IO/Compress/Brotli.pm b/lib/IO/Compress/Brotli.pm index f1b76e2..ed206a9 100644 --- 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)