diff options
| -rw-r--r-- | security/cops/files/patch-aa | 32 |
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>; |