$NetBSD: patch-ac,v 1.2 2011/01/29 19:39:14 spz Exp $

avoid the wrapper + -C trap

--- bounce-remind.orig	1996-12-09 16:49:46.000000000 +0000
+++ bounce-remind
@@ -17,13 +17,16 @@
 
 $main'program_name = 'mj_bounce-remind';
 
-# Read and execute the .cf file
-$cf = $ENV{"MAJORDOMO_CF"} || "/etc/majordomo.cf";
+# Read and execute the .cf file. For security reasons, let the environment win
+$cf = "/etc/majordomo.cf";
 if ($ARGV[0] eq "-C") {
     $cf = $ARGV[1];
     shift(@ARGV);
     shift(@ARGV);
 }
+if ($ENV{"MAJORDOMO_CF"}) {
+	$cf = $ENV{"MAJORDOMO_CF"};
+}
 if (! -r $cf) {
     die("$cf not readable; stopped");
 }
@@ -33,6 +36,7 @@ require "$cf";
 chdir("$homedir");
 
 # All these should be in the standard PERL library
+unshift(@INC, $bindir);
 unshift(@INC, $homedir);
 
 # Set these here so that they can be interploated on the $mailer command line.
