Correct the test count in lib/File/Temp/t/lock.t

[perl5.git] / Policy_sh.SH

diff --git a/Policy_sh.SH b/Policy_sh.SH
index fe7b9f0..a618d23 100644 (file)
--- a/Policy_sh.SH
+++ b/Policy_sh.SH
@@ -184,11 +184,11 @@ do
        ;;
     sitearch)  dflt="$sitelib/$archname" ;;
 
-    siteman1dir)       dflt="$siteprefix/man/man1" ;;
-    siteman3dir)       dflt="$siteprefix/man/man3" ;;
+    siteman1)  dflt="$siteprefix/man/man1" ;;
+    siteman3)  dflt="$siteprefix/man/man3" ;;
     # We don't know what to do with these yet.
-    sitehtml1dir)      dflt='' ;;
-    sitehtml3dir)      dflt='' ;;
+    sitehtml1) dflt='' ;;
+    sitehtm31dir)      dflt='' ;;
     
     # Directories for vendor-supplied add-on files
     # These are all usually empty.
@@ -213,11 +213,11 @@ do
                ;;
            vendorarch) dflt="$vendorlib/$archname" ;;
 
-           vendorman1dir)      dflt="$vendorprefix/man/man1" ;;
-           vendorman3dir)      dflt="$vendorprefix/man/man3" ;;
+           vendorman1) dflt="$vendorprefix/man/man1" ;;
+           vendorman3) dflt="$vendorprefix/man/man3" ;;
            # We don't know what to do with these yet.
-           vendorhtml1dir)     dflt='' ;;
-           vendorhtml3dir)     dflt='' ;;
+           vendorhtml1)        dflt='' ;;
+           vendorhtm3) dflt='' ;;
 
            esac  # End of vendorprefix != ''
        fi