X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FEncode%2FSymbol%2FMakefile.PL;h=063369908f6bf673c099df138d746025cd51b0cc;hb=48e3bbddf569369fe6921f305df6ab7290c91152;hp=be99058ae10e9e3076fd2fe3fe7956d4fabe4fa2;hpb=5129552cc421a69f6981a03ac0ecc86b5722d1e6;p=p5sagit%2Fp5-mst-13.2.git diff --git a/ext/Encode/Symbol/Makefile.PL b/ext/Encode/Symbol/Makefile.PL index be99058..0633699 100644 --- a/ext/Encode/Symbol/Makefile.PL +++ b/ext/Encode/Symbol/Makefile.PL @@ -4,11 +4,11 @@ use ExtUtils::MakeMaker; my $name = 'Symbol'; my %tables = ( - symbol => ['symbol.ucm','dingbats.ucm'], + symbol_t => ['symbol.ucm','dingbats.ucm', 'macDingbats.ucm'], ); WriteMakefile( - INC => "-I..", + INC => "-I../Encode", NAME => 'Encode::'.$name, VERSION_FROM => "$name.pm", OBJECT => '$(O_FILES)', @@ -38,7 +38,7 @@ sub post_initialize $self->{'O_FILES'} = [sort keys %o]; my @files = ("$name.xs"); $self->{'C'} = ["$name.c"]; - $self->{'H'} = [$self->catfile($self->updir,'encode.h')]; + $self->{'H'} = [$self->catfile($self->updir,'Encode', 'encode.h')]; my %xs; foreach my $table (keys %tables) { push (@{$self->{'C'}},"$table.c"); @@ -56,7 +56,7 @@ sub post_initialize #include #include #define U8 U8 -#include "../encode.h" +#include "encode.h" END foreach my $table (keys %tables) { print XS qq[#include "${table}.h"\n]; @@ -99,7 +99,7 @@ sub postamble { my $self = shift; my $dir = $self->catdir($self->updir,'Encode'); - my $str = "# $name\$(OBJ_EXT) depends on .h and _def.h files not .c files - but all written by compile\n"; + my $str = "# $name\$(OBJ_EXT) depends on .h and _def.h files not .c files - but all written by enc2xs\n"; $str .= "$name.c : $name.xs "; foreach my $table (keys %tables) { @@ -108,13 +108,13 @@ sub postamble $str .= "\n\n"; $str .= "$name\$(OBJ_EXT) : $name.c\n\n"; - my $compile = $self->catfile($self->updir,'compile'); + my $enc2xs = $self->catfile($self->updir,'bin', 'enc2xs'); foreach my $table (keys %tables) { my $numlines = 1; my $lengthsofar = length($str); my $continuator = ''; - $str .= "$table.c : $compile Makefile.PL"; + $str .= "$table.c : $enc2xs Makefile.PL"; foreach my $file (@{$tables{$table}}) { $str .= $continuator.' '.$self->catfile($dir,$file); @@ -127,8 +127,8 @@ sub postamble } } $str .= $^O eq 'VMS' # In VMS quote to preserve case - ? qq{\n\t\$(PERL) $compile -"Q" -o \$\@ -f $table.fnm\n\n} - : qq{\n\t\$(PERL) $compile -Q -o \$\@ -f $table.fnm\n\n}; + ? qq{\n\t\$(PERL) $enc2xs -"Q" -o \$\@ -f $table.fnm\n\n} + : qq{\n\t\$(PERL) $enc2xs -Q -o \$\@ -f $table.fnm\n\n}; open (FILELIST, ">$table.fnm") || die "Could not open $table.fnm: $!"; foreach my $file (@{$tables{$table}})