Subversion Repositories pike

Compare Revisions

Ignore whitespace Rev 33 → Rev 36

/branches/7.6-stable/debian/patches/12_perl_init.dpatch
7,9 → 7,9
FILE=src/modules/Perl/configure
 
dpatch_patch() {
[ ! -e ${FILE}.bak ] || return 1
[ ! -e ${FILE}.dp-orig ] || return 1
 
sed -i.bak -f - ${FILE} <<'END_SED'
sed -i.dp-orig -f - ${FILE} <<'END_SED'
/my_perl = perl_alloc();/i\
PERL_SYS_INIT3(&argc,&argv,&env);
/perl_free(my_perl);/a\
21,7 → 21,7
}
 
dpatch_unpatch() {
patch -p1 -R $* && [ -e ${FILE}.bak ] && mv -f ${FILE}.bak ${FILE}
patch -p1 -R $* && [ -e ${FILE}.dp-orig ] && mv -f ${FILE}.dp-orig ${FILE}
 
}