Mercurial > pub > Impl
diff lib/IMPL/Web/NotAllowedException.pm @ 407:c6e90e02dd17 ref20150831
renamed Lib->lib
author | cin |
---|---|
date | Fri, 04 Sep 2015 19:40:23 +0300 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/lib/IMPL/Web/NotAllowedException.pm Fri Sep 04 19:40:23 2015 +0300 @@ -0,0 +1,30 @@ +package IMPL::Web::NotAllowedException; +use strict; + +use IMPL::Const qw(:prop); +use IMPL::declare { + base => [ + 'IMPL::Web::Exception' => '@_' + ] +}; + +use IMPL::Resources::Strings { + message => "The requested method isn't allowed" +}; + +sub CTOR { + my $this = shift; + my %args = @_; + + $this->headers({ + allow => $args{allow} + }); +} + +sub status { + "405 Method Not Allowed" +} + +1; + +__END__ \ No newline at end of file