This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
In the vms/descrip_mms.template the perlvms.pod must
authorJarkko Hietaniemi <jhi@iki.fi>
Fri, 22 Aug 2003 13:22:02 +0000 (13:22 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Fri, 22 Aug 2003 13:22:02 +0000 (13:22 +0000)
be copied from vms/, err, [.vms], not [.pod].

p4raw-id: //depot/perl@20833

pod/buildtoc
vms/descrip_mms.template

index 751fd9d..29602d4 100644 (file)
@@ -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
index 61d0e97..62177af 100644 (file)
@@ -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]