diff options
Diffstat (limited to 'lib/App/Acmeman/Source.pm')
-rw-r--r-- | lib/App/Acmeman/Source.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/App/Acmeman/Source.pm b/lib/App/Acmeman/Source.pm index de1a666..abae342 100644 --- a/lib/App/Acmeman/Source.pm +++ b/lib/App/Acmeman/Source.pm @@ -25,6 +25,13 @@ sub get { return $self->{_cfg}->get(@_); } +sub is_set { + my $self = shift; + croak "improper use of the get method" + unless exists $self->{_cfg}; + return $self->{_cfg}->is_set(@_); +} + sub define_domain { my $self = shift; my $cn = shift || croak "domain name must be given"; |