Handle 'trace' and 'debug' with Perl compiler

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@5820 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2007-04-03 03:34:55 +00:00
parent 737ee8c4d4
commit f65ff294df

View File

@ -276,6 +276,7 @@ compiler() {
#
# Perl compiler -- set the appropriate Perl options
#
[ "$1" = debug ] && DEBUG=Yes && shift
debugflags="-w"
[ -n "$DEBUG" ] && debugflags='-wd'
[ -n "$PROFILE" ] && DEBUGFLAGS='-wd:DProf'