X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=Policy_sh.SH;h=b953046f9d064509d11b5e5b51422508cdef0300;hb=cc31225e4d4aa42bdd0b59e2f2e27664df411220;hp=cb8536c4546446a4a7937484680db2d12bccb885;hpb=9e80d8f4145fe9fb88dfa64d5a8ed02291dfee55;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/Policy_sh.SH b/Policy_sh.SH
index cb8536c..b953046 100644
--- a/Policy_sh.SH
+++ b/Policy_sh.SH
@@ -134,11 +134,11 @@ do
 	;;
     sitelib)
 	case "$siteprefix" in
-	*perl*)	dflt=$prefix/lib/site_perl ;;
-	*)	dflt=$prefix/lib/$package/site_perl ;;
+	*perl*)	dflt=$prefix/lib/site_perl/$version ;;
+	*)	dflt=$prefix/lib/$package/site_perl/$version ;;
 	esac
 	;;
-    sitearch)	dflt="$sitelib/$apiversion/$archname" ;;
+    sitearch)	dflt="$sitelib/$archname" ;;
 
     siteman1dir)	dflt="$siteprefix/man/man1" ;;
     siteman3dir)	dflt="$siteprefix/man/man3" ;;
@@ -166,11 +166,11 @@ do
 		;;
 	    vendorlib)
 		case "$vendorprefix" in
-		*perl*)	dflt=$prefix/lib/vendor_perl ;;
-		*)	dflt=$prefix/lib/$package/vendor_perl ;;
+		*perl*)	dflt=$prefix/lib/vendor_perl/$version ;;
+		*)	dflt=$prefix/lib/$package/vendor_perl/$version ;;
 		esac
 		;;
-	    vendorarch)	dflt="$vendorlib/$apiversion/$archname" ;;
+	    vendorarch)	dflt="$vendorlib/$archname" ;;
 
 	    vendorman1dir)	dflt="$vendorprefix/man/man1" ;;
 	    vendorman3dir)	dflt="$vendorprefix/man/man3" ;;