perl: finally fix the uudmap.h bug (closes #3709)
[openwrt/svn-archive/archive.git] / lang / perl / patches / 100-static_uudmap.patch
1 diff -urN perl-5.10.0.orig/generate_uudmap perl-5.10.0/generate_uudmap
2 --- perl-5.10.0.orig/generate_uudmap 1970-01-01 01:00:00.000000000 +0100
3 +++ perl-5.10.0/generate_uudmap 2008-07-05 20:23:22.122800470 +0200
4 @@ -0,0 +1,7 @@
5 +#!/bin/bash
6 +echo \{
7 +for i in {0..31}; do echo -n ' 0,'; done
8 +echo
9 +for i in {0..63}; do echo -n " $i,"; done
10 +echo
11 +echo \}
12 diff -urN perl-5.10.0.orig/Makefile.micro perl-5.10.0/Makefile.micro
13 --- perl-5.10.0.orig/Makefile.micro 2007-12-18 11:47:07.000000000 +0100
14 +++ perl-5.10.0/Makefile.micro 2008-07-05 20:38:56.428673229 +0200
15 @@ -173,13 +173,8 @@
16 uxsutils$(_O): $(HE) xsutils.c
17 $(CC) $(CCFLAGS) -o $@ $(CFLAGS) xsutils.c
18
19 -uudmap.h: generate_uudmap$(_X)
20 - $(RUN) ./generate_uudmap$(_X) >uudmap.h
21 -
22 -generate_uudmap$(_O): generate_uudmap.c
23 - $(CC) $(CCFLAGS) -o $@ $(CFLAGS) generate_uudmap.c
24 -
25 -generate_uudmap$(_X): generate_uudmap$(_O)
26 - $(LD) -o generate_uudmap $(LDFLAGS) generate_uudmap$(_O) $(LIBS)
27 +uudmap.h:
28 + chmod a+x generate_uudmap
29 + $(RUN) ./generate_uudmap >uudmap.h
30
31 # That's it, folks!
32 diff -urN perl-5.10.0.orig/Makefile.SH perl-5.10.0/Makefile.SH
33 --- perl-5.10.0.orig/Makefile.SH 2007-12-18 11:47:07.000000000 +0100
34 +++ perl-5.10.0/Makefile.SH 2008-07-05 20:32:48.699799105 +0200
35 @@ -478,11 +478,13 @@
36
37 globals\$(OBJ_EXT): uudmap.h
38
39 -uudmap.h: generate_uudmap\$(EXE_EXT)
40 - \$(RUN) ./generate_uudmap\$(EXE_EXT) >uudmap.h
41 +uudmap.h: generate_uudmap
42 + \$(RUN) ./generate_uudmap >uudmap.h
43
44 -generate_uudmap\$(EXE_EXT): generate_uudmap\$(OBJ_EXT)
45 - \$(CC) -o generate_uudmap \$(LDFLAGS) generate_uudmap\$(OBJ_EXT) \$(libs)
46 +generate_uudmap:
47 + cp ../generate_uudmap .
48 + chmod a+x generate_uudmap
49 + touch generate_uudmap
50
51 !GROK!THIS!
52 $spitshell >>Makefile <<'!NO!SUBS!'