Mercurial > pub > Impl

comparison lib/IMPL/Config/ServiceNotFoundException.pm @ 416:cc2cf8c0edc2 ref20150831

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
sync
author cin
date Thu, 29 Oct 2015 03:50:25 +0300
parents
children
comparison
equal deleted inserted replaced
415:3d24b10dd0d5 416:cc2cf8c0edc2
1 package IMPL::Config::ServiceNotFoundException;
2 use strict;
3
4 use IMPL::declare {
5 base => [
6 'IMPL::AppException' => undef
7 ],
8 props => [
9 serviceName => 'ro',
10 ]
11 };
12
13 use IMPL::Resources::Strings {
14 message => "Service %serviceName% not found"
15 };
16
17 sub CTOR {
18 my ( $this, %args ) = @_;
19
20 $this->$_( $args{$_} ) foreach grep exists $args{$_}, qw(
21 serviceName
22 );
23 }
24
25 1;