diff options
| -rw-r--r-- | lib/Mail/Run/Crypt.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Mail/Run/Crypt.pm b/lib/Mail/Run/Crypt.pm index bd99043..2c33684 100644 --- a/lib/Mail/Run/Crypt.pm +++ b/lib/Mail/Run/Crypt.pm @@ -29,7 +29,7 @@ sub new { my $self = {%opts}; # We must have a recipient - exists $self->{mailto} and defined $self->{mailto} + defined $self->{mailto} or croak 'mailto required'; # Default the instance name to the package name if it wasn't given; @@ -42,9 +42,9 @@ sub new { # If signing, we need a key ID and a passphrase if ( $self->{sign} ) { - exists $self->{keyid} and defined $self->{keyid} + defined $self->{keyid} or croak 'keyid required for signing'; - exists $self->{passphrase} and defined $self->{passphrase} + defined $self->{passphrase} or croak 'passphrase required for signing'; } |