Explicitly give --verify command to GPG.

[autodns.git] / autodns.pl

diff --git a/autodns.pl b/autodns.pl
index fa4e09b6a337cb4005e18f1a2b62d126ad5e3571..ddb237c06155656a9d7ad3314b0464f9f165ad37 100755 (executable)
--- a/autodns.pl
+++ b/autodns.pl
@@ -252,7 +252,7 @@ if ($entity->parts) {
 } else {
        # Clear text.
 
-       my $pid = open3(\*GPGIN, \*GPGOUT, \*GPGERR, "gpg --batch");
+       my $pid = open3(\*GPGIN, \*GPGOUT, \*GPGERR, "gpg --batch --verify");
 
        # Feed it the mail.
        print GPGIN $entity->bodyhandle->as_string;