summaryrefslogtreecommitdiff
path: root/mail/majordomo/files/patch-ba
diff options
context:
space:
mode:
Diffstat (limited to 'mail/majordomo/files/patch-ba')
-rw-r--r--mail/majordomo/files/patch-ba38
1 files changed, 0 insertions, 38 deletions
diff --git a/mail/majordomo/files/patch-ba b/mail/majordomo/files/patch-ba
deleted file mode 100644
index 286a50cc963f..000000000000
--- a/mail/majordomo/files/patch-ba
+++ /dev/null
@@ -1,38 +0,0 @@
---- archive2.pl.Dist Fri Jan 7 03:00:49 2000
-+++ archive2.pl Sun Apr 16 23:15:49 2000
-@@ -54,10 +54,23 @@
- shift(@ARGV);
- shift(@ARGV);
- }
--if (! -r $cf) {
-- die("$cf not readable; stopped");
-+
-+if (not sysopen CONFIG,$cf,O_RDONLY)
-+{
-+ die sprintf qq|Unable to sysopen config file "$cf"%s.\n|,$! ? ": $!" : '';
-+}
-+elsif ((stat CONFIG)[4] != $>)
-+{
-+ die qq|Config file "$cf" not owned by effective UID.\n|;
-+}
-+elsif (eval(join '',<CONFIG>),$@)
-+{
-+ die qq|Unable to eval "$cf": $@.\n|;
-+}
-+else
-+{
-+ close CONFIG;
- }
--require "$cf";
-
- # All these should be in the standard PERL library
- unshift(@INC, $homedir);
-@@ -88,7 +101,7 @@
- exit 1;
- }
-
--$sendmail_command = $sendmail_command || "/usr/lib/sendmail";
-+$sendmail_command = $sendmail_command || "/usr/sbin/sendmail";
- $bounce_mailer = $bounce_mailer || "$sendmail_command -f\$sender -t";
- &set_abort_addr($whoami_owner);
- &set_mail_from($whoami);