diff options
-rw-r--r-- | lib/ExtUtils/Mksymlists.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/ExtUtils/Mksymlists.pm b/lib/ExtUtils/Mksymlists.pm index a0126cc3a0..1ba5bcd234 100644 --- a/lib/ExtUtils/Mksymlists.pm +++ b/lib/ExtUtils/Mksymlists.pm @@ -173,6 +173,8 @@ sub _write_vms { # We don't do anything to preserve order, so we won't relax # the GSMATCH criteria for a dynamic extension + print OPT "case_sensitive=yes\n" + if $Config::Config{d_vms_case_sensitive_symbols}; foreach $sym (@{$data->{FUNCLIST}}) { my $safe = $set->addsym($sym); if ($isvax) { print OPT "UNIVERSAL=$safe\n" } |