VOS-only change to lib/ExtUtils/MM_Unix.pm

Message-Id: <200204011911.OAA06024@mailhub1.stratus.com>

p4raw-id: //depot/perl@15665

diff --git a/lib/ExtUtils/MM_Unix.pm b/lib/ExtUtils/MM_Unix.pm
index c6c2c93..ae0251d 100644 (file)
--- a/lib/ExtUtils/MM_Unix.pm
+++ b/lib/ExtUtils/MM_Unix.pm
@@ -488,6 +488,9 @@ sub constants {
 
              / ) {
        next unless defined $self->{$tmp};
+#      VOS pathnames can have sharp signs in them; escape them so
+#      make doesn't think it is a comment-start character.
+       if ($Is_VOS) {$self->{$tmp} =~ s/#/\\#/g};
        push @m, "$tmp = $self->{$tmp}\n";
     }