Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package perl-GnuPG-Interface for 
openSUSE:Factory checked in at 2021-04-17 00:01:41
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-GnuPG-Interface (Old)
 and      /work/SRC/openSUSE:Factory/.perl-GnuPG-Interface.new.12324 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-GnuPG-Interface"

Sat Apr 17 00:01:41 2021 rev:4 rq:885787 version:1.02

Changes:
--------
--- 
/work/SRC/openSUSE:Factory/perl-GnuPG-Interface/perl-GnuPG-Interface.changes    
    2020-08-10 14:59:26.204046061 +0200
+++ 
/work/SRC/openSUSE:Factory/.perl-GnuPG-Interface.new.12324/perl-GnuPG-Interface.changes
     2021-04-17 00:01:47.653596819 +0200
@@ -1,0 +2,12 @@
+Tue Apr 13 21:18:48 UTC 2021 - [email protected] - 1.02
+
+- update to 1.02:
+  + Work around an issue with CLI options for deleting secret 
+    keys in gpg 2.2
+  + Make $gnupg->call('foo') update the internal GnuPG version number
+  + Localize tainted PATH env to make exec happy
+- remove t/get_public_keys.t as it tries to fetch keys from the 
+  internet, which is not possible in restricted build environments
+- use new upstream source url
+
+-------------------------------------------------------------------

Old:
----
  GnuPG-Interface-1.00.tar.gz

New:
----
  GnuPG-Interface-1.02.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-GnuPG-Interface.spec ++++++
--- /var/tmp/diff_new_pack.A21rp1/_old  2021-04-17 00:01:48.241597746 +0200
+++ /var/tmp/diff_new_pack.A21rp1/_new  2021-04-17 00:01:48.241597746 +0200
@@ -1,7 +1,7 @@
 #
 # spec file for package perl-GnuPG-Interface
 #
-# Copyright (c) 2020 SUSE LLC
+# Copyright (c) 2021 SUSE LLC
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -17,14 +17,14 @@
 
 
 Name:           perl-GnuPG-Interface
-Version:        1.00
+Version:        1.02
 Release:        0
 %define cpan_name GnuPG-Interface
 Summary:        Perl interface to GnuPG
 License:        Artistic-1.0 OR GPL-1.0-or-later
 Group:          Development/Libraries/Perl
 URL:            https://metacpan.org/release/%{cpan_name}
-Source0:        
https://cpan.metacpan.org/authors/id/J/JE/JESSE/%{cpan_name}-%{version}.tar.gz
+Source0:        
https://cpan.metacpan.org/authors/id/B/BP/BPS/%{cpan_name}-%{version}.tar.gz
 Source1:        cpanspec.yml
 BuildArch:      noarch
 BuildRoot:      %{_tmppath}/%{name}-%{version}-build
@@ -52,6 +52,8 @@
 
 %prep
 %setup -q -n %{cpan_name}-%{version}
+# remove tests that require an online system (OBS workers have no network)
+rm t/get_public_keys.t 
 
 %build
 PERL_USE_UNSAFE_INC=1 perl Makefile.PL INSTALLDIRS=vendor

++++++ GnuPG-Interface-1.00.tar.gz -> GnuPG-Interface-1.02.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/GnuPG-Interface-1.00/Changes 
new/GnuPG-Interface-1.02/Changes
--- old/GnuPG-Interface-1.00/Changes    2020-05-13 21:57:03.000000000 +0200
+++ new/GnuPG-Interface-1.02/Changes    2021-04-09 22:58:48.000000000 +0200
@@ -1,5 +1,12 @@
 Revision history for GnuPG-Interface
 
+1.02 - 2021-04-09
+ - Work around an issue with CLI options for deleting secret keys in gpg 2.2
+
+1.01 - 2021-01-26
+ - Make $gnupg->call('foo') update the internal GnuPG version number.
+ - Localize tainted PATH env to make exec happy
+
 1.0 - 2020-05-13
  - Limit support to GnuPG 2.2+ and 1.4
  - Additional information from keys when using GnuPG 2.2 or higher
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/GnuPG-Interface-1.00/MANIFEST 
new/GnuPG-Interface-1.02/MANIFEST
--- old/GnuPG-Interface-1.00/MANIFEST   2020-05-13 21:57:03.000000000 +0200
+++ new/GnuPG-Interface-1.02/MANIFEST   2021-04-09 23:01:01.000000000 +0200
@@ -50,10 +50,14 @@
 t/sign_and_encrypt.t
 t/UserId.t
 t/verify.t
+t/version_updates.t
 t/wrap_call.t
+t/z_delete_keys.t
 t/zzz_cleanup.t
 test/encrypted.1.gpg
 test/encrypted.2.gpg
+test/fake-gpg-v1
+test/fake-gpg-v2
 test/fake-pinentry.pl
 test/gpg.conf
 test/key.1.asc
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/GnuPG-Interface-1.00/META.yml 
new/GnuPG-Interface-1.02/META.yml
--- old/GnuPG-Interface-1.00/META.yml   2020-05-13 22:02:21.000000000 +0200
+++ new/GnuPG-Interface-1.02/META.yml   2021-04-09 23:01:25.000000000 +0200
@@ -25,6 +25,7 @@
   Moo: '0.091011'
   MooX::HandlesVia: '0.001004'
   MooX::late: '0.014'
+  Scalar::Util: 0
 resources:
   license: http://dev.perl.org/licenses/
-version: '1.00'
+version: '1.02'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/GnuPG-Interface-1.00/Makefile.PL 
new/GnuPG-Interface-1.02/Makefile.PL
--- old/GnuPG-Interface-1.00/Makefile.PL        2020-05-13 21:57:03.000000000 
+0200
+++ new/GnuPG-Interface-1.02/Makefile.PL        2021-04-09 22:47:52.000000000 
+0200
@@ -23,6 +23,7 @@
 requires 'MooX::late' => '0.014';
 requires 'Math::BigInt' => '1.78';
 requires 'Fatal';
+requires 'Scalar::Util';
 license 'perl';
 
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/GnuPG-Interface-1.00/SIGNATURE 
new/GnuPG-Interface-1.02/SIGNATURE
--- old/GnuPG-Interface-1.00/SIGNATURE  2020-05-13 22:02:23.000000000 +0200
+++ new/GnuPG-Interface-1.02/SIGNATURE  2021-04-09 23:01:34.000000000 +0200
@@ -1,5 +1,5 @@
 This file contains message digests of all files listed in MANIFEST,
-signed via the Module::Signature module, version 0.83.
+signed via the Module::Signature module, version 0.79.
 
 To verify the content in this distribution, first make sure you have
 Module::Signature installed, then type:
@@ -14,91 +14,95 @@
 -----BEGIN PGP SIGNED MESSAGE-----
 Hash: SHA256
 
-SHA256 40fd03ca91f8ff428c8dbe217c646e7d8c6777b2016d95b5a4003dce0ce30143 Changes
-SHA256 a88d644002b8f00f1c369da77144fc79cb289ca2c7912eadd44c246ee08c2d1c 
MANIFEST
-SHA256 93d50f37fd222dbe3a8590a019f39d7a79ba725227b53ea6f9dd195830e2fb77 
MANIFEST.SKIP
-SHA256 8bd01c7a116d2cbd561e0d56199e95967e5b1ca9b24f0fac15a9b39486295088 
META.yml
-SHA256 898ed6f95b1700265f483d0fad3fe337438ac022c597bdfe904a9bf987410655 
Makefile.PL
-SHA256 c0d74f2b2987828dc66017694f36454f429b5be29ca235db1e626f12d67cc1b2 README
-SHA256 67d139199c03b8bf8447a5a62f0d0b6dc1bd5bf6dbe04de6d21998c577823ed6 
inc/Module/Install.pm
-SHA256 6ebcc53a161dd5dc0aae69e4704575f2b00181901d768a82e26722a309cfdbe4 
inc/Module/Install/Base.pm
-SHA256 d3f8c839d03fd21c197d05362dbb277cd7cadb15da6390d124b61e851f15146e 
inc/Module/Install/Can.pm
-SHA256 e9e72e18921c10c87bc4ea4c20af83e52015b9f5775d00ac64073042403717ca 
inc/Module/Install/Fetch.pm
-SHA256 a7a681bf2c9eee58a372cb642ffe42b0301d1200432ba8de9f7791cd1ecc9827 
inc/Module/Install/Makefile.pm
-SHA256 aa887fa65a5eb6bbd1805706ce298b3f3cd55b353ecfd37aa7d35ae419331a49 
inc/Module/Install/Metadata.pm
-SHA256 53825bc78e4c910b888160bc148c8bc211be58e02b99c8edcbf4854f95faa049 
inc/Module/Install/ReadmeFromPod.pm
-SHA256 26b166ff62aacdb55317d1659f160aa4935097eea9810ea980e6d747206b5dc0 
inc/Module/Install/Win32.pm
-SHA256 5f73a6851a91ea44e65b924f918743ad6e860620ad7a38a39d0295e0c5652a9f 
inc/Module/Install/WriteAll.pm
-SHA256 21170a181c773923aa779477d62eed6357f44c9ab27b2abd216f097d78901c9e 
lib/GnuPG/Fingerprint.pm
-SHA256 341fe948514a63dc081708c3a5356e0237ef1f333d964d99e9829a9e956f82d9 
lib/GnuPG/Handles.pm
-SHA256 fa9fca26659ef2baba11543b4cbcb141dc6d66191cea9bc07140a8cb3bccec9f 
lib/GnuPG/HashInit.pm
-SHA256 64cfdfa5cd59c60cbbb36cd4c7c9a8cd87a39049f5ba690155910508005324e7 
lib/GnuPG/Interface.pm
-SHA256 f53d8e10107713b8c72d1e0ae13021964344ed205e412fb49621ada6fd32bf3e 
lib/GnuPG/Key.pm
-SHA256 729f79dfaf58ba9d7321a8005f90a9dea1614b61556c50120bc323fe753e0022 
lib/GnuPG/Options.pm
-SHA256 de1dbcd19ece6fd939367f1132f08afdede2553e4c20028d08c186d10ec0d9c8 
lib/GnuPG/PrimaryKey.pm
-SHA256 21e7704eb1b290470661c8d256b5391941203ce42df10ef87862307a18f3a5e8 
lib/GnuPG/PublicKey.pm
-SHA256 797d9e9abebb03aa15e8f4de9285216febbc608e41f099002f6160268d087de5 
lib/GnuPG/Revoker.pm
-SHA256 9e899d4cd41d95203dcfca7041c8ae1dc9c01fa828b11ca09529dc4f0503d999 
lib/GnuPG/SecretKey.pm
-SHA256 8238221e3300ea420ebd92eec784a8d4c8e32ca91a104d854dcb72e42cfd2158 
lib/GnuPG/Signature.pm
-SHA256 879000dc23cbce49d8b6ecb179afa45ea3a91ee8c5272dc3c953fd2253d53c31 
lib/GnuPG/SubKey.pm
-SHA256 89c853903cc9220a8e2ae05483b5b295ef0d100fe91066ab955addf720b26249 
lib/GnuPG/UserAttribute.pm
-SHA256 57892e62bf1291be5dbf56f75691022f344ef3850524e1d65051bdd6dc4797c8 
lib/GnuPG/UserId.pm
-SHA256 dae227d6b1c5dfc5fa0e404c747ed3258a221dea7ab773927bd199530c299b38 
t/000_setup.t
-SHA256 2ba7457456a05dc99a4ad7240127c0fa04655c7bcefd41ca40bf8cc89e72fd0c 
t/Fingerprint.t
-SHA256 4e3d72d1d66cde3777a1aaa43b482edfab79845e76570f5fab09532761f47cc5 
t/Interface.t
-SHA256 13a39c1c8e9ef2335b01c194caa83b48fd15bee9bc35723df2532fac6cbcb204 
t/MyTest.pm
-SHA256 96050358ec301df2c456a4216817bfd6cb359fae4348a717c4a56325de522fcc 
t/MyTestSpecific.pm
-SHA256 ecc3d7593ee9580b2a247a8bbe8384e51f4659d21d21878d0e8925d8520d55a1 
t/UserId.t
-SHA256 1c1105851a3a35632b09fa3f09efb0bbfee788fba38f124e732acc7c18cce0c9 
t/clearsign.t
-SHA256 e06f37b7379b8e970aef4f1b1e0e6d7c0b12fcd15a8890db990dc56fa1dbc4e1 
t/decrypt.t
-SHA256 5dadb07fda0101d02e9a7bcd81142d5f3c79ff0746cc2ec3d02db0056adc2e79 
t/detach_sign.t
-SHA256 d2cd3e45ddcafc924573c675d9613203633fc37c1deeba0f4338781b550a9ab9 
t/encrypt.t
-SHA256 2f9d931effb1b8bfdb20c250ae7ad0cdfac1b9546408e2b1c722b8559f7d57f6 
t/encrypt_symmetrically.t
-SHA256 5bad9360f0e5cfe956c7aed6691da13a233eaf869d6b9c89d8717970f450035d 
t/export_keys.t
-SHA256 8f31e088ceb6dac7b61b23b5e6f2857ff377f371945df68e6f48bff443ca9588 
t/get_public_keys.t
-SHA256 b1a0059daf0f74eb56a6bf644db37f50b0fb9fd8a0a4460b3b61b8a6e698e448 
t/get_secret_keys.t
-SHA256 e6551cf8c9b417e97ad7ae0ba17cba696420d0fd82f6dbfed906ba95c990a3ce 
t/import_keys.t
-SHA256 3d1a6a667e365bcfe4fe21af2d13dfb0aced9077bf140cfa859b955ba9def388 
t/list_public_keys.t
-SHA256 bc59185d9c1634eca69c08b9541556902f81cde96fc74ee898472abf05ff61b4 
t/list_secret_keys.t
-SHA256 233a3438cadd21602d821271e4f4d117e131b7d09098543c556689f3a00bb840 
t/list_sigs.t
-SHA256 998f85987922a9f55895b696808c677b036e199ba6054773cc0318ab55f21150 
t/passphrase_handling.t
-SHA256 dbba8768ec668f5963cda97b50ebf0bd4759cf53c7d584afe724e05f2e3ecc32 
t/sign.t
-SHA256 58dd4921945ed7347ba028f52c87fe5ea43487ec3c4765afb73e97686e277a15 
t/sign_and_encrypt.t
-SHA256 845140735d2be4acc0ae4c3459ef06646d26843584d370b18f49fcc17d27ccae 
t/verify.t
-SHA256 4fe916000a3a23c7a06386252ae5731ffb5c08d2f03c07826908529844cc3c27 
t/wrap_call.t
-SHA256 a38c6762ac3bc3fe324a3e2a729259f780cb6d5d1f5fec24a2b362010be475e0 
t/zzz_cleanup.t
-SHA256 5a829fe0270a33d5157563fe555f395aae1c0fa6ed0aaf68308af50f880fa259 
test/encrypted.1.gpg
-SHA256 d595ad88a2af6192660ef386fb36ac90d55088e5a9e55294fb54c06d9260fd97 
test/encrypted.2.gpg
-SHA256 90de0e214326e6cc05c49813836ebc9f0b67805b8d8d37bd160dd34c02334b12 
test/fake-pinentry.pl
-SHA256 73e66c46bb07993b2df8b785c90737dc4cd708a3c6ae50a8721d4a20434cd62f 
test/gpg.conf
-SHA256 d51ec60087f52f6f4e7dfc2cd2eca5b2130c06051fadaf99994eeb14954d80a5 
test/key.1.asc
-SHA256 b9d3444cdd0a8bee742dccf550d090a8ad36415fc5e96831fd3ec82dc1c574d3 
test/new_secret.pgp
-SHA256 f2ca1bb6c7e907d06dafe4687e579fce76b37e4e93b7605022da52e6ccc26fd2 
test/passphrase
-SHA256 369c75d88ce40c4f2440cc3e0b1149990eed0702f1ea7d613489eb48adfa42ea 
test/plain.1.txt
-SHA256 a6e9c6e238daf6212dfc51a42dc5c6809b3100a68d2323b6a598995e81a4a100 
test/plain.2.txt
-SHA256 fda2ddcbe111a6e41f5a0866e93174d6517941c1ca67c84e62d8a576ee02dada 
test/public-keys-sigs/1.0.test
-SHA256 ac786cf67af312cc69070cbef261616cc6dde6b4a01ea82cbf3258ed6ee5bb6d 
test/public-keys-sigs/1.1.test
-SHA256 ff749cc7df40c450355d411e1e21b525836dd65d3b6f63d2924cbf3cdd5dba15 
test/public-keys-sigs/2.0.test
-SHA256 db9438e4c0c6cbcb9c6484c1b09ba332609631fe2966ba553821a526c96e0d2d 
test/public-keys-sigs/2.1.test
-SHA256 384b4f167fe72745bb69e1e987fc927bd92677d3d51276198b43b1b6d10873df 
test/public-keys/1.0.test
-SHA256 11287dcbac0d9c62a2796ce7d5e26bf3f301a5db8e5ff00c8d69a0c627dab376 
test/public-keys/1.1.test
-SHA256 06a81da24c9a2860b411188577068dd285ba469c5023eb1bac6d3cc489e6bf2c 
test/public-keys/2.0.test
-SHA256 ba075f34630a38dcc9d368f23ccfe0d6116d9eb05190bdb01337f76dffe96acd 
test/public-keys/2.1.test
-SHA256 6b3ef18f32c501a3cfdd94644594055796271ac2634b21cb82c5126c60454de0 
test/public_keys.pgp
-SHA256 f37f6448e73bdb18977c459e949fa30e59e1d6abb3a0533005191112c8dd0e34 
test/secret-keys/1.0.test
-SHA256 53100dae1939540999ee2dea39e46077fdaa905870dea5e426eb5add32290619 
test/secret-keys/1.1.test
-SHA256 8eb233c6c122e84cb3ccd758c1787300e93aeb38b16e986761a03455e2ed1f8c 
test/secret-keys/1.2.test
-SHA256 83c081e123ec2453b42388865b8948e8bbc5276c739ee6087aad4cdc98f127a5 
test/secret-keys/2.0.test
-SHA256 b84cf371c144ae5bdb201c7a8fa0461562ac7d87395c94406b8611bc855d5bb3 
test/secret_keys.pgp
-SHA256 1fb329b56306f80d4c23398f2f8076b8f7fffa19fcda7193be24c8792807ea80 
test/signed.1.asc
+SHA1 58df30f41479b74a5136dce6cb57903bb9bccf6f Changes
+SHA1 b8afd3fa6b961d3e0a64dd941b07b2bf08a18020 MANIFEST
+SHA1 01aaeb25c70093c04dd0b27f8619332393830652 MANIFEST.SKIP
+SHA1 ad518658d7ce95936baa78955559d9b912b92b55 META.yml
+SHA1 c121366967afd6b218323ea4df929d1bbed43110 Makefile.PL
+SHA1 2fc4a445629985a484469b495f1ceb15f7b635d9 README
+SHA1 c3f8f9f2a209f80b7ca3c8af3a6b1b7b408ad620 inc/Module/Install.pm
+SHA1 de30b539a326675c42e6ad360fddb05902d621be inc/Module/Install/Base.pm
+SHA1 81fffeca82bcd7100d8435b139f0780fcc5cdf9c inc/Module/Install/Can.pm
+SHA1 b4dd9cb3cf0cb60390c575bd3405e2297d4a0b1a inc/Module/Install/Fetch.pm
+SHA1 b84cf97b12f8e5ef37bea54e33ddce32dff804d1 inc/Module/Install/Makefile.pm
+SHA1 0d9fd69718198fcd1560214c4f23fcaa44f8395e inc/Module/Install/Metadata.pm
+SHA1 8d19f4485276b987b7838d4ec01909f8055a4724 
inc/Module/Install/ReadmeFromPod.pm
+SHA1 99b8179fbd9e05422b161cf91abe198744188064 inc/Module/Install/Win32.pm
+SHA1 6a91e14bbecc64e9c8e2261dfa4b360641d152e4 inc/Module/Install/WriteAll.pm
+SHA1 0b8019dedbd45a368d11088e29ef9f169ed40539 lib/GnuPG/Fingerprint.pm
+SHA1 7d9dc51ba25c5525d796c195ab2a15380f78029d lib/GnuPG/Handles.pm
+SHA1 b2fe771ca9a1d719b222013e08b93ab57f7452e8 lib/GnuPG/HashInit.pm
+SHA1 08af10bd5fa9f78c8064a211810a17454050d482 lib/GnuPG/Interface.pm
+SHA1 fc1ae42e880aa2b730e77f4a46da33ff4ce578fc lib/GnuPG/Key.pm
+SHA1 a9aeb895a186cffec1828bf9fca9411234505b47 lib/GnuPG/Options.pm
+SHA1 bd3ab65a9089e086ff3bf44781a099830cdd2f6e lib/GnuPG/PrimaryKey.pm
+SHA1 a38e294729aac733fafcf9d7e4b7ef5fcb50e685 lib/GnuPG/PublicKey.pm
+SHA1 4b917013b36c4e66bdf3ae27cc8e056c9bd6be64 lib/GnuPG/Revoker.pm
+SHA1 3dbf6667b73b61dff5bc8db30b6dd81415297c09 lib/GnuPG/SecretKey.pm
+SHA1 f19dfa77fd83fcc520aa2246318b359c0ba844cd lib/GnuPG/Signature.pm
+SHA1 3267654e96c0fbe6805c466f193e92c5cd8a5e5b lib/GnuPG/SubKey.pm
+SHA1 acfec9fd5e879711280d5ac8ebfd667fde8d4f1e lib/GnuPG/UserAttribute.pm
+SHA1 d70a9e4c89b2fe445c733dc9c177d62cc9f44826 lib/GnuPG/UserId.pm
+SHA1 b9e982d8360e168c1c9d565582e42f2dd792062b t/000_setup.t
+SHA1 367fdb308292a9c005afffef49ff9096a20a4da3 t/Fingerprint.t
+SHA1 d9dd42839cf88b708fc1a87ebb8d4cec1e9be51c t/Interface.t
+SHA1 980fcd5a1d302e65cc2414be96d5f3a4266e8308 t/MyTest.pm
+SHA1 53f15a6d3c5c3943ade61f5fe597d537b6b2b068 t/MyTestSpecific.pm
+SHA1 ccd942d9f00627253d7eb9c011116dc5671639b8 t/UserId.t
+SHA1 e2e53ab9458c61d32b973a16d32573a954e13769 t/clearsign.t
+SHA1 d89a92151669da3fec256502f5014261077e2226 t/decrypt.t
+SHA1 b828dfb74321c117264b4418cf57d2da3d96f7c4 t/detach_sign.t
+SHA1 f7471dc0a0d56ddd4b3c914b6f8b835eecc38660 t/encrypt.t
+SHA1 2d8d00e2bd767c658c2a795ec970398af3c87ebe t/encrypt_symmetrically.t
+SHA1 ae21d78d4a3af65ff7eaef240cc90f3d09a2229e t/export_keys.t
+SHA1 e4083dae3946081b3a757825213a131e78e5dc09 t/get_public_keys.t
+SHA1 9d64b90da57e904bcae368496e78d4f132604b8c t/get_secret_keys.t
+SHA1 5a4cbcdac983766a60f5f25db20bf81f251c9b3a t/import_keys.t
+SHA1 6dd9228dc8316384b5fc6410012f7fd5eac19c19 t/list_public_keys.t
+SHA1 d75d9f785b3094421011f0ad8c1799dad225aff4 t/list_secret_keys.t
+SHA1 d0bb05cee33efd536962e28b9f1eacd2cb03bf2b t/list_sigs.t
+SHA1 07a602cbb5a78518cd4cccfb7007e80564a19e1e t/passphrase_handling.t
+SHA1 99c53aa0a919cbf16cba74be84c6cff3af0cd097 t/sign.t
+SHA1 cef254d25a4c8a8b2e02d4f215d2297b95f07f1c t/sign_and_encrypt.t
+SHA1 cabbf4e667027f9bb7958673bc9b8be2d1577e29 t/verify.t
+SHA1 c66d9fcfc45a37d72c729eefba9a377d5778329f t/version_updates.t
+SHA1 8fd17bc4ad8ac4c4357503edfe2d1a952a44c28b t/wrap_call.t
+SHA1 375f99600a05d4b1bbaff046bd079194e1625bb1 t/z_delete_keys.t
+SHA1 c005f5b1de96721e9455ddc3dc727d5d4bd17615 t/zzz_cleanup.t
+SHA1 58f58338a2922798c59c5e852bd0110541f27e2d test/encrypted.1.gpg
+SHA1 6b4f8006e15940ca93d8629a145258bdc109edd3 test/encrypted.2.gpg
+SHA1 3b0e1dbd40b361ceda883f1a563201ff65fc25d8 test/fake-gpg-v1
+SHA1 c0686932708d254906a003a5ffe46f170530022d test/fake-gpg-v2
+SHA1 3c6c6dd448fcf2a67b241fead821146489e6e46f test/fake-pinentry.pl
+SHA1 1290379acadab2cc713d659c7c3feff2b0923f75 test/gpg.conf
+SHA1 b012a47f295ee9dcc955560b9a78c0ad3a61e137 test/key.1.asc
+SHA1 6a34c098dd418f13266020d4c7e810f2da08e7b0 test/new_secret.pgp
+SHA1 4e1243bd22c66e76c2ba9eddc1f91394e57f9f83 test/passphrase
+SHA1 59c0e6436b38645144d17ce11ac4aabfdd43e960 test/plain.1.txt
+SHA1 a2e120b6c6effab16d8734ea6e56e80a28858742 test/plain.2.txt
+SHA1 7d94ea032bdbb0104c1dc73583ec64ade6294495 test/public-keys-sigs/1.0.test
+SHA1 63d93054decf9ff6c2dc99eb03f131b55af4ee43 test/public-keys-sigs/1.1.test
+SHA1 bd9892a93f802c68109b11b756f79f6b0292eb1a test/public-keys-sigs/2.0.test
+SHA1 73d90696020a01753cda984262a2831dcc6ac0d7 test/public-keys-sigs/2.1.test
+SHA1 82d483adc6d203c79856a70dd259370f6efdeef7 test/public-keys/1.0.test
+SHA1 86056ad37b8bb67d55ac61b5d5a27ac4bbd1cceb test/public-keys/1.1.test
+SHA1 a8e97a2439671dae0dd29a2404c321ccb686ba7a test/public-keys/2.0.test
+SHA1 54d2c13bf3b73b7582edef091175dfe3763ddf59 test/public-keys/2.1.test
+SHA1 4349906c08f65af3b13e7b441ac4dd2e637bfeae test/public_keys.pgp
+SHA1 8fcae9373283d70fc2b941ebd5e59fc03147b40b test/secret-keys/1.0.test
+SHA1 5ab2fd7245b905259aa5dccc023f1e0a4417a55a test/secret-keys/1.1.test
+SHA1 3d9fc47a5598f62170aee923d7b00f81079cb6bc test/secret-keys/1.2.test
+SHA1 3bd6135279f9ae23e32680707c6170910421e5de test/secret-keys/2.0.test
+SHA1 9ce5508cd8cefadc4c9bf2842864b52e87b1826e test/secret_keys.pgp
+SHA1 981418a80bf7dab91b63608cfd1ddf5091f89ad7 test/signed.1.asc
 -----BEGIN PGP SIGNATURE-----
 
-iQEzBAEBCAAdFiEExJs3Lyv4ShkBFmAnDfCig/6sgLIFAl68Uk8ACgkQDfCig/6s
-gLJp7gf/Ys444GmW0i6k+NhnW/kpFqn+P8seuGMfIoxFm04nr5AWhtmac5rkjk0k
-FGyoxL8NX3Zzxt55o4mN3+edDRsWRummFqa1clpHl3FSMye/GRXQUsavTLVnjCNX
-DyE8/38cdaGcOQccLisS0Hud+C4HEXK/zW9EKyr6shGkMSkx8sKwe7ghN8yYAoMr
-JnS8Bp1q1/BUpc9PosNsC6dEmPrHkhN5fj01APvNm2SbR7ipk0Njn9Xwtip+8yKY
-vZRnC4lzDn5Og0VVGyUCYjpocQkzFWc0X7UMO7bhEqmH3eyYgh+z8OT7/hO3tw/K
-MnbjDHaYcmmnDhN3gwldobM6/Akb6Q==
-=ClL/
+iQEzBAEBCAAdFiEEFelFwSnB+u9xCpouFedxUadmpRQFAmBwwK4ACgkQFedxUadm
+pRT+lgf/Uhf7JupcQmMWYRWHkPlAWVeL4M5Ip/rJt/p/0yytdaDMgxztLEq4/ynE
+n7D2lZKDUrfWiARO+l6xBllHkm+ilvZgpLH7ENR7VWZGg8TwmRVDwgmjKMdTSZ8x
+arSmCdlN2OrSp9PTnRNDYbK5nZrQgQ/1QNz3rerQFcnxgKbAxwcNmBHIiPOxQmLa
+HO6W91DHZaEQ1+yFE6FZYAqFUazwG3XhrH3gyshJCfWcReyHtcZMpGbWxHVjApH0
+tiLoRB9DFs0YHWBCVE3k14UgeKTfNTcGbJFDLQWwTHDLwt9pz0X4oLlTBRZYeYv9
+a0O80zh3dM5tUMfWw9rAkz+14XH9qQ==
+=VCIr
 -----END PGP SIGNATURE-----
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/GnuPG-Interface-1.00/lib/GnuPG/Interface.pm 
new/GnuPG-Interface-1.02/lib/GnuPG/Interface.pm
--- old/GnuPG-Interface-1.00/lib/GnuPG/Interface.pm     2020-05-13 
21:57:03.000000000 +0200
+++ new/GnuPG-Interface-1.02/lib/GnuPG/Interface.pm     2021-04-09 
22:53:23.000000000 +0200
@@ -27,14 +27,22 @@
 use Math::BigInt try => 'GMP';
 use GnuPG::Options;
 use GnuPG::Handles;
+use Scalar::Util 'tainted';
 
-$VERSION = '1.00';
+$VERSION = '1.02';
 
-has $_ => (
+has passphrase => (
     isa     => 'Any',
     is      => 'rw',
-    clearer => 'clear_' . $_,
-) for qw(call passphrase);
+    clearer => 'clear_passphrase',
+);
+
+has call => (
+    isa     => 'Any',
+    is      => 'rw',
+    trigger => 1,
+    clearer => 'clear_call',
+);
 
 # NB: GnuPG versions
 #
@@ -68,10 +76,7 @@
 
 sub BUILD {
     my ( $self, $args ) = @_;
-
-    $self->hash_init( call => 'gpg' );
-    $self->hash_init(%$args);
-    $self->_set_version($self->_version());
+    $self->hash_init( call => 'gpg', %$args );
 }
 
 struct(
@@ -82,6 +87,12 @@
     }
 );
 
+# Update version if "call" is updated
+sub _trigger_call {
+    my ( $self, $gpg ) = @_;
+    $self->_set_version( $self->_version() );
+}
+
 #################################################################
 # real worker functions
 
@@ -325,6 +336,13 @@
         }
 
         my @args = $self->options->get_args();
+
+        # Get around a bug in 2.2, see also https://dev.gnupg.org/T4667
+        # this covers both --delete-secret-key(s) and 
--delete-secret-and-public-key(s)
+        if ( $self->version && $self->cmp_version( $self->version, 2.2 ) >= 0 
&& $commands[0] =~ /^--delete-secret-.*keys?$/ ) {
+            push @args, '--yes';
+        }
+
         push @args, '--pinentry-mode', 'loopback'
           if $use_loopback_pinentry;
 
@@ -333,6 +351,7 @@
             @commands,     @command_args
         );
 
+        local $ENV{PATH} if tainted $ENV{PATH};
         exec @command or die "exec() error: $ERRNO";
     }
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/GnuPG-Interface-1.00/t/Interface.t 
new/GnuPG-Interface-1.02/t/Interface.t
--- old/GnuPG-Interface-1.00/t/Interface.t      2019-06-23 13:32:52.000000000 
+0200
+++ new/GnuPG-Interface-1.02/t/Interface.t      2021-04-09 22:47:52.000000000 
+0200
@@ -10,8 +10,8 @@
 
 use GnuPG::Interface;
 
-my $v1 = 'gpg';
-my $v2 = 'gnupg';
+my $v1 = './test/fake-gpg-v1';
+my $v2 = './test/fake-gpg-v2';
 
 my $gnupg = GnuPG::Interface->new( call => $v1 );
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/GnuPG-Interface-1.00/t/version_updates.t 
new/GnuPG-Interface-1.02/t/version_updates.t
--- old/GnuPG-Interface-1.00/t/version_updates.t        1970-01-01 
01:00:00.000000000 +0100
+++ new/GnuPG-Interface-1.02/t/version_updates.t        2021-04-09 
22:47:52.000000000 +0200
@@ -0,0 +1,30 @@
+#!/usr/bin/perl -w
+
+use strict;
+
+use lib './t';
+use MyTest;
+use MyTestSpecific;
+
+TEST
+{
+    my $gpg = GnuPG::Interface->new(call => './test/fake-gpg-v1');
+    return ($gpg->version() eq '1.4.23');
+};
+
+
+TEST
+{
+    my $gpg = GnuPG::Interface->new(call => './test/fake-gpg-v2');
+    return ($gpg->version() eq '2.2.12');
+};
+
+TEST
+{
+    my $gpg = GnuPG::Interface->new(call => './test/fake-gpg-v1');
+    my $v1 = $gpg->version();
+    $gpg->call('./test/fake-gpg-v2');
+    my $v2 = $gpg->version();
+
+    return ($v1 eq '1.4.23' && $v2 eq '2.2.12');
+}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/GnuPG-Interface-1.00/t/z_delete_keys.t 
new/GnuPG-Interface-1.02/t/z_delete_keys.t
--- old/GnuPG-Interface-1.00/t/z_delete_keys.t  1970-01-01 01:00:00.000000000 
+0100
+++ new/GnuPG-Interface-1.02/t/z_delete_keys.t  2021-04-09 22:52:09.000000000 
+0200
@@ -0,0 +1,51 @@
+use strict;
+use English qw( -no_match_vars );
+
+use lib './t';
+use MyTest;
+use MyTestSpecific;
+
+TEST
+{
+    reset_handles();
+
+    my $pid = $gnupg->wrap_call(
+        gnupg_commands     => [qw( --delete-secret-keys )],
+        gnupg_command_args => [qw( 0x93AFC4B1B0288A104996B44253AE596EF950DA9C 
)],
+        handles            => $handles,
+    );
+
+    waitpid $pid, 0;
+
+    return $CHILD_ERROR == 0;
+};
+
+TEST
+{
+    reset_handles();
+
+    my $pid = $gnupg->wrap_call(
+        gnupg_commands     => [qw( --delete-keys )],
+        gnupg_command_args => [qw( 0x93AFC4B1B0288A104996B44253AE596EF950DA9C 
)],
+        handles            => $handles,
+    );
+
+    waitpid $pid, 0;
+
+    return $CHILD_ERROR == 0;
+};
+
+TEST
+{
+    reset_handles();
+
+    my $pid = $gnupg->wrap_call(
+        gnupg_commands     => [qw( --delete-secret-and-public-keys )],
+        gnupg_command_args => [qw( 278F850AA702911F1318F0A61B913CE9B6747DDC )],
+        handles            => $handles,
+    );
+
+    waitpid $pid, 0;
+
+    return $CHILD_ERROR == 0;
+};
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/GnuPG-Interface-1.00/test/fake-gpg-v1 
new/GnuPG-Interface-1.02/test/fake-gpg-v1
--- old/GnuPG-Interface-1.00/test/fake-gpg-v1   1970-01-01 01:00:00.000000000 
+0100
+++ new/GnuPG-Interface-1.02/test/fake-gpg-v1   2021-04-09 22:47:52.000000000 
+0200
@@ -0,0 +1,2 @@
+#!/bin/sh
+echo 'gpg (GnuPG) 1.4.23'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/GnuPG-Interface-1.00/test/fake-gpg-v2 
new/GnuPG-Interface-1.02/test/fake-gpg-v2
--- old/GnuPG-Interface-1.00/test/fake-gpg-v2   1970-01-01 01:00:00.000000000 
+0100
+++ new/GnuPG-Interface-1.02/test/fake-gpg-v2   2021-04-09 22:47:52.000000000 
+0200
@@ -0,0 +1,2 @@
+#!/bin/sh
+echo 'gpg (GnuPG) 2.2.12'

Reply via email to