File: use_gpg1.patch

package info (click to toggle)
libgnupg-perl 0.19-3
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, buster, stretch
  • size: 352 kB
  • ctags: 215
  • sloc: perl: 1,222; makefile: 7; sh: 1
file content (20 lines) | stat: -rw-r--r-- 738 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Description: use gpg1 explicitly, package is not compatible with GnuPG 2.1.x
Author: Florian Schlichting <fsfs@debian.org>
Bug-Debian: https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=834522

--- a/GnuPG.pm
+++ b/GnuPG.pm
@@ -366,10 +366,10 @@
       unless -x $args{gnupg_path};
     $self->{gnupg_path} = $args{gnupg_path};
     } else {
-    my ($path) = grep { -x "$_/gpg" } split /:/, $ENV{PATH};
-    croak ( "Couldn't find gpg in PATH ($ENV{PATH})\n" )
+    my ($path) = grep { -x "$_/gpg1" } split /:/, $ENV{PATH};
+    croak ( "Couldn't find gpg1 in PATH ($ENV{PATH})\n" )
       unless $path;
-    $self->{gnupg_path} = "$path/gpg";
+    $self->{gnupg_path} = "$path/gpg1";
     }
     $self->{trace} = $args{trace} ? 1 : 0;