aboutsummaryrefslogtreecommitdiff
path: root/security/cops
diff options
context:
space:
mode:
authorSteve Price <steve@FreeBSD.org>1998-02-22 01:27:22 +0000
committerSteve Price <steve@FreeBSD.org>1998-02-22 01:27:22 +0000
commit0946932e4d36858577a24eb3141211a4ff97d391 (patch)
treef8d0bd5f7f754a6cb79c0a03f50f8b4849ee39c8 /security/cops
parent6c2fdb7ccf5c59a2f471a221c1e5336ea94be914 (diff)
downloadports-0946932e4d36858577a24eb3141211a4ff97d391.tar.gz
ports-0946932e4d36858577a24eb3141211a4ff97d391.zip
Notes
Diffstat (limited to 'security/cops')
-rw-r--r--security/cops/files/patch-aa32
1 files changed, 32 insertions, 0 deletions
diff --git a/security/cops/files/patch-aa b/security/cops/files/patch-aa
new file mode 100644
index 000000000000..53a8e007bd75
--- /dev/null
+++ b/security/cops/files/patch-aa
@@ -0,0 +1,32 @@
+--- perl/cops.orig Sat Feb 21 19:20:10 1998
++++ perl/cops Sat Feb 21 19:21:06 1998
+@@ -1,8 +1,4 @@
+-#!/bin/sh -- need to mention perl here to avoid recursion
+-'true' || eval 'exec perl -S $0 $argv:q';
+-eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
+-& eval 'exec /usr/local/bin/perl -S $0 $argv:q'
+- if 0;
++#!/usr/bin/perl
+
+ #
+ # Usage: cops [-vx] [-c config file] [-s secure_dir] [architecture]
+@@ -83,7 +79,7 @@
+
+ # Read stuff to do from the config file
+ die "$0: Can't trust $CONFIG to reconfig!\n" if &'is_writable($CONFIG);
+-open CONFIG || die "can't open $CONFIG: $!";
++open (CONFIG) || die "can't open $CONFIG: $!";
+
+ &argh unless -s $CONFIG;
+
+@@ -219,8 +215,8 @@
+ }
+ return 1 if (($FILE2 eq "") || (-s $FILE1 != -s $report));
+
+- open FILE1 || die "can't open $FILE1: $!\n";
+- open FILE2 || die "can't open $FILE2: $!\n";
++ open (FILE1) || die "can't open $FILE1: $!\n";
++ open (FILE2) || die "can't open $FILE2: $!\n";
+
+ for (1..5) {
+ $_ = <FILE1>;