X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FEncode%2FEncode%2FMakefile_PL.e2x;h=59b51493533bbf2bc6ba7e5a848fb771ecf1ff80;hb=f2a2953c25503948c9a5e44b5ee7fe84a7da6b46;hp=8cf60fd3e1adb1fc6e9c8ea345fbf53c597fb041;hpb=735b7a62d039909fa334af8e05d4788f54c2c65a;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/ext/Encode/Encode/Makefile_PL.e2x b/ext/Encode/Encode/Makefile_PL.e2x
index 8cf60fd..59b5149 100644
--- a/ext/Encode/Encode/Makefile_PL.e2x
+++ b/ext/Encode/Encode/Makefile_PL.e2x
@@ -134,8 +134,8 @@ sub postamble
 		$continuator = '';
 	    }
 	}
-	my $plib   = $ENV{PERL_CORE} ? '-I$(PERL_LIB)' : '';
-	my $ucopts = ($^O eq 'VMS')  ? '-"Q" -"O"' : '-Q -O'; 
+	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")