diff options
-rw-r--r-- | lib/GnuPG/Interface.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/GnuPG/Interface.pm b/lib/GnuPG/Interface.pm index 889a12f..b9be5bb 100644 --- a/lib/GnuPG/Interface.pm +++ b/lib/GnuPG/Interface.pm @@ -100,7 +100,7 @@ sub wrap_call( $% ) { $self->passphrase("\n") unless $self->passphrase(); my $needs_passphrase_handled - = ( $self->passphrase() and not $handles->passphrase() ) ? 1 : 0; + = ( $self->passphrase() =~ m/\S/ and not $handles->passphrase() ) ? 1 : 0; if ($needs_passphrase_handled) { $handles->passphrase( IO::Handle->new() ); |