diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-25 18:23:54 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-25 18:23:54 +0000 |
| commit | ecae74d57f163b118cfb0c091a7f996cb47d5861 (patch) | |
| tree | 31183a32a833769c3f34480791f86af97716b6ae /ext/Devel | |
| parent | 726de688badb2dba66cc57284f3430b731015d48 (diff) | |
| download | perl-ecae74d57f163b118cfb0c091a7f996cb47d5861.tar.gz | |
The joys of portable quoting.
p4raw-id: //depot/perl@13264
Diffstat (limited to 'ext/Devel')
| -rw-r--r-- | ext/Devel/PPPort/harness/Makefile.PL | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/ext/Devel/PPPort/harness/Makefile.PL b/ext/Devel/PPPort/harness/Makefile.PL index 0059272fcd..59c6c0cad5 100644 --- a/ext/Devel/PPPort/harness/Makefile.PL +++ b/ext/Devel/PPPort/harness/Makefile.PL @@ -36,6 +36,8 @@ EOM my $Ilibdir = $^O eq 'VMS' ? qq{"-I$libdir"} : qq{-I$libdir}; + $pmfile =~ s:\\:\\\\:g; + $retval .= qq[\t\$(PERL) $Ilibdir -e "require qq{$pmfile}; Devel::PPPort::WriteFile(qq{ppport.h})"]; return $retval; |