Allow perl scripts to be used in rc.d scripts

PR:		conf/117027
Reviewed by:	pjd (mentor)
Approved by:	hrs
MFC after:	2 weeks
This commit is contained in:
Steven Hartland 2013-01-10 11:08:22 +00:00
parent bdf43bb5c3
commit 7ef204a2a9

View File

@ -290,7 +290,7 @@ _find_processes()
_interpbn=${1##*/}
_fp_args='_argv'
_fp_match='case "$_argv" in
${_interp}|"${_interp} "*|"${_interpbn}: ${_procname}"*)'
${_interp}|"${_interp} "*|"[${_interpbn}]"|"${_interpbn}: ${_procname}"*)'
else # a normal daemon
_procnamebn=${_procname##*/}
_fp_args='_arg0 _argv'