PERL_SRC already has brackets on VMS.

Follow-up to 28161c97e726a0cbc7d3e30460aa0bf491d83b97.

diff --git a/ext/DynaLoader/Makefile.PL b/ext/DynaLoader/Makefile.PL
index a58e952..d3670a8 100644 (file)
--- a/ext/DynaLoader/Makefile.PL
+++ b/ext/DynaLoader/Makefile.PL
@@ -50,7 +50,7 @@ sub MY::static {
     if ($is_mswin || $is_netware) {
        $object = '$(PERL_SRC)\\$(OBJECT)';
     } elsif ($is_vms) {
-       $object = '[$(PERL_SRC)].$(OBJECT)';
+       $object = '$(PERL_SRC)$(OBJECT)';
     } else {
        $object = '$(PERL_SRC)/$(OBJECT)';
     }