Rev 33 | Go to most recent revision | Show entire file | Ignore 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 |