diff options
Diffstat (limited to 'pod/buildtoc')
| -rw-r--r-- | pod/buildtoc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/pod/buildtoc b/pod/buildtoc index 751fd9d25c..29602d44da 100644 --- 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 |