X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FEncode%2FTW%2FMakefile.PL;h=8284ad056c6524e1ef6b9b5a6d30bded26c9ff05;hb=80a5d8e74b5512d4ab704d0e83466ae41247ce55;hp=925fa32905b87104be650013fcdca8d00311d436;hpb=004283b80f6094bb85aba6f48a74e3c5c34ea24f;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/ext/Encode/TW/Makefile.PL b/ext/Encode/TW/Makefile.PL
index 925fa32..8284ad0 100644
--- a/ext/Encode/TW/Makefile.PL
+++ b/ext/Encode/TW/Makefile.PL
@@ -129,8 +129,8 @@ sub postamble
 		$continuator = '';
 	    }
 	}
-	my $plib   = $ENV{PERL_CORE} ? '-I$(PERL_LIB)' : '';
-	my $ucopts = ($^O eq 'VMS')  ? '-"Q"' : '-Q'; # VMS tweaks
+	my $plib   = $self->{PERL_CORE} ? '"-I$(PERL_LIB)"' : '';
+	my $ucopts = '-"Q"';
 	$str .=  
 	    qq{\n\t\$(PERL) $plib $enc2xs $ucopts -o \$\@ -f $table.fnm\n\n};
 	open (FILELIST, ">$table.fnm")