2016-11-18 22:39:22 +01:00

33 lines
1.2 KiB
Plaintext

$NetBSD: patch-sa-update,v 1.3 2016/02/05 16:06:09 prlw1 Exp $
Prepare for substitution.
--- sa-update.raw.orig 2014-02-07 08:36:38.000000000 +0000
+++ sa-update.raw 2014-04-26 13:56:38.000000000 +0100
@@ -340,10 +340,10 @@
if ($GPG_ENABLED || $opt{'import'}) {
# find GPG in the PATH
# bug 4958: for *NIX it's "gpg", in Windows it's "gpg.exe"
- $GPGPath = 'gpg' . $Config{_exe};
+ $GPGPath = '@GPGPATH@' . $Config{_exe};
dbg("gpg: Searching for '$GPGPath'");
- if ($GPGPath = Mail::SpamAssassin::Util::find_executable_in_env_path($GPGPath)) {
+ if (-f $GPGPath) {
dbg("gpg: found $GPGPath");
# bug 5030: if GPGPath has a space, put it in quotes
@@ -1459,10 +1459,8 @@
!$out_fname_exists ? 'new' : $force_reload ? 'replace' : 'update');
my($ext_prog, $cmd, @args);
- foreach my $try_prog ('curl', 'wget', 'fetch') {
- $cmd = Mail::SpamAssassin::Util::find_executable_in_env_path($try_prog);
- if (defined $cmd && $cmd ne '') { $ext_prog = $try_prog; last }
- }
+ $ext_prog = '@SA_UPDATE_FETCH_PROG@';
+ $cmd = '@SA_UPDATE_FETCH_CMD@';
if (defined $ext_prog && $ext_prog eq 'curl') {
push(@args, qw(-s -L -O --remote-time -g --max-redirs 2