In the vms/descrip_mms.template the perlvms.pod must

be copied from vms/, err, [.vms], not [.pod].

p4raw-id: //depot/perl@20833

diff --git a/pod/buildtoc b/pod/buildtoc
index 751fd9d..29602d4 100644 (file)
--- a/pod/buildtoc
+++ b/pod/buildtoc
@@ -512,8 +512,8 @@ sub generate_descrip_mms_1 {
 }
 
 sub generate_descrip_mms_2 {
-  map {sprintf <<'SNIP', $_, $_}
-[.lib.pod]%s.pod : [.pod]%s.pod
+  map {sprintf <<'SNIP', $_, $_ eq 'perlvms' ? 'vms' : 'pod', $_}
+[.lib.pod]%s.pod : [.%s]%s.pod
        @ If F$Search("[.lib]pod.dir").eqs."" Then Create/Directory [.lib.pod]
        Copy/NoConfirm/Log $(MMS$SOURCE) [.lib.pod]
 SNIP

diff --git a/vms/descrip_mms.template b/vms/descrip_mms.template
index 61d0e97..62177af 100644 (file)
--- a/vms/descrip_mms.template
+++ b/vms/descrip_mms.template
@@ -1130,7 +1130,7 @@ preplibrary : $(MINIPERL_EXE) $(LIBPREREQ)
        @ If F$Search("[.lib]pod.dir").eqs."" Then Create/Directory [.lib.pod]
        Copy/NoConfirm/Log $(MMS$SOURCE) [.lib.pod]
 
-[.lib.pod]perlvms.pod : [.pod]perlvms.pod
+[.lib.pod]perlvms.pod : [.vms]perlvms.pod
        @ If F$Search("[.lib]pod.dir").eqs."" Then Create/Directory [.lib.pod]
        Copy/NoConfirm/Log $(MMS$SOURCE) [.lib.pod]