3 files changed, 15 insertions, 2 deletions
diff --git a/release/scripts/catpages-make.sh b/release/scripts/catpages-make.sh
index 755057d..042d104 100755
--- a/release/scripts/catpages-make.sh
+++ b/release/scripts/catpages-make.sh
@@ -10,3 +10,8 @@ if [ -d ${RD}/trees/base/usr/share/man ]; then
 	find cat* whatis | cpio -dumpl ${RD}/trees/catpages/usr/share/man > /dev/null 2>&1) &&
 	rm -rf ${RD}/trees/base/usr/share/man/cat*;
 fi
+if [ -d ${RD}/trees/base/usr/share/perl/man ]; then
+	( cd ${RD}/trees/base/usr/share/perl/man;
+	find cat* whatis | cpio -dumpl ${RD}/trees/catpages/usr/share/perl/man > /dev/null 2>&1) &&
+	rm -rf ${RD}/trees/base/usr/share/perl/man/cat*;
+fi
diff --git a/release/scripts/doFS.sh b/release/scripts/doFS.sh
index 12aceaa..985f7ed 100644
--- a/release/scripts/doFS.sh
+++ b/release/scripts/doFS.sh
@@ -21,6 +21,9 @@ FSPROTO=$1 ; shift
 FSINODE=$1 ; shift
 FSLABEL=$1 ; shift
 
+BOOT1=${RD}/trees/base/boot/boot1
+BOOT2=${RD}/trees/base/boot/boot2
+
 deadlock=20
 
 dofs_vn () {
@@ -47,7 +50,7 @@ dofs_vn () {
 	dd of=${FSIMG} if=/dev/zero count=${FSSIZE} bs=1k 2>/dev/null
 
 	vnconfig -s labels -c /dev/r${VNDEVICE} ${FSIMG}
-	disklabel -Brw ${VNDEVICE} ${FSLABEL}
+	disklabel -w -B -b ${BOOT1} -s ${BOOT2} ${VNDEVICE} ${FSLABEL}
 	newfs -i ${FSINODE} -o space -m 1 /dev/r${VNDEVICE}c
 
 	mount /dev/${VNDEVICE}c ${MNT}
@@ -98,7 +101,7 @@ dofs_md () {
 			exit 1
 		fi
 	fi
-	disklabel -Brw ${MDDEVICE} ${FSLABEL}
+	disklabel -w -B -b ${BOOT1} -s ${BOOT2} ${MDDEVICE} ${FSLABEL}
 	newfs -i ${FSINODE} -o space -m 0 /dev/${MDDEVICE}c
 
 	mount /dev/${MDDEVICE}c ${MNT}
diff --git a/release/scripts/manpages-make.sh b/release/scripts/manpages-make.sh
index bb1326f..0f13d3c 100755
--- a/release/scripts/manpages-make.sh
+++ b/release/scripts/manpages-make.sh
@@ -10,3 +10,8 @@ if [ -d ${RD}/trees/base/usr/share/man ]; then
 	find . | cpio -dumpl ${RD}/trees/manpages/usr/share/man > /dev/null 2>&1) &&
 	rm -rf ${RD}/trees/base/usr/share/man;
 fi
+if [ -d ${RD}/trees/base/usr/share/perl/man ]; then
+	( cd ${RD}/trees/base/usr/share/perl/man;
+	find . | cpio -dumpl ${RD}/trees/manpages/usr/share/perl/man > /dev/null 2>&1) &&
+	rm -rf ${RD}/trees/base/usr/share/perl/man;
+fi