diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/ExtUtils/Embed.pm')
| -rw-r--r-- | Master/tlpkg/tlperl/lib/ExtUtils/Embed.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/tlperl/lib/ExtUtils/Embed.pm b/Master/tlpkg/tlperl/lib/ExtUtils/Embed.pm index 24ae9092f52..9710630e515 100644 --- a/Master/tlpkg/tlperl/lib/ExtUtils/Embed.pm +++ b/Master/tlpkg/tlperl/lib/ExtUtils/Embed.pm @@ -1,4 +1,3 @@ -# $Id: Embed.pm,v 1.1.1.1 2002/01/16 19:27:19 schwern Exp $ require 5.002; package ExtUtils::Embed; @@ -19,7 +18,7 @@ use vars qw(@ISA @EXPORT $VERSION use strict; # This is not a dual-life module, so no need for development version numbers -$VERSION = '1.28'; +$VERSION = '1.30'; @ISA = qw(Exporter); @EXPORT = qw(&xsinit &ldopts @@ -144,6 +143,7 @@ sub static_ext { sub _escape { my $arg = shift; + return $$arg if $^O eq 'VMS'; # parens legal in qualifier lists $$arg =~ s/([\(\)])/\\$1/g; } |