Subversion Repositories

?revision_form?Rev ?revision_input??revision_submit??revision_endform?

Rev 33 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 33 Rev 36
Line 5... Line 5...
5
## DP: Credit to Niko Tyni <ntyni@debian.org>.
5
## DP: Credit to Niko Tyni <ntyni@debian.org>.
6
6
7
FILE=src/modules/Perl/configure
7
FILE=src/modules/Perl/configure
8
8
9
dpatch_patch() {
9
dpatch_patch() {
10
    [ ! -e ${FILE}.bak ] || return 1
10
    [ ! -e ${FILE}.dp-orig ] || return 1
11
11
12
    sed -i.bak -f - ${FILE} <<'END_SED'
12
    sed -i.dp-orig -f - ${FILE} <<'END_SED'
13
/my_perl = perl_alloc();/i\
13
/my_perl = perl_alloc();/i\
14
  PERL_SYS_INIT3(&argc,&argv,&env);
14
  PERL_SYS_INIT3(&argc,&argv,&env);
15
/perl_free(my_perl);/a\
15
/perl_free(my_perl);/a\
16
  PERL_SYS_TERM();
16
  PERL_SYS_TERM();
17
END_SED
17
END_SED
Line 19... Line 19...
19
    patch -p1 $*
19
    patch -p1 $*
20
20
21
}
21
}
22
22
23
dpatch_unpatch() {
23
dpatch_unpatch() {
24
    patch -p1 -R $* && [ -e ${FILE}.bak ] && mv -f ${FILE}.bak ${FILE}
24
    patch -p1 -R $* && [ -e ${FILE}.dp-orig ] && mv -f ${FILE}.dp-orig ${FILE}
25
25
26
}
26
}
27
27
28
28
29
DPATCH_LIB_NO_DEFAULT=1
29
DPATCH_LIB_NO_DEFAULT=1