Conditionally trace writes by copy2().

Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2010-03-29 11:56:06 -07:00
parent dc7d4bdb09
commit 51d4bf19b5

View File

@ -96,14 +96,15 @@ sub generate_script_1( $ ) {
copy $globals{SHAREDIRPL} . 'prog.header6';
}
copy2 $globals{SHAREDIR} . '/lib.common';
copy2 $globals{SHAREDIR} . '/lib.common', 0;
}
my $lib = find_file 'lib.private';
copy2 $lib if -f $lib;
}
my $lib = find_file 'lib.private';
copy2( $lib, $debug ) if -f $lib;
emit <<'EOF';
################################################################################
# Functions to execute the various user exits (extension scripts)