#------------------------------------------------------------------------------
# mk_version manpage
# mk_version creates system dependent versions from one manual page
# afb 1/91
#------------------------------------------------------------------------------

	name=`basename $0`
	usage="Usage: $name manpage"

	versions="targon31 sun3"
	default=sun3			# default branch

get_fullname()
{
	case $1
	in targon31)	fullname="Nixdorf Targon/31"
	;; sun3)	fullname="Sun 3"
	esac
}

if [ $# -ne 1 ]
then	echo >&2 "$usage"; exit 1
fi
manpage="$1"; shift
if [ ! -r RCS/$manpage,v ]
then	echo >&2 "$name: $manpage not found"; exit 1
fi

head=`rlog $manpage | sed '/^head:/!d; s/head:  *//; q'`
case $head
in [1-9].[1-9]*)	# OK
;; *)			echo >&2 "$name: cannot extract version number"; exit 1
esac

echo "ready for creating new versions for $manpage? [n]\c "; read answer
case $answer
in [yYjJ]*)	# ok
;; *)		echo >&2 "$name: quits"; exit 1
esac

branch=1
for version in $versions
do	echo "ready for version $version with branch $head.$branch? [y]\c"
	read answer
	case $answer
	in ""|[yYjJ]*)	get_fullname "$version"
			fname="$fullname"
			fullname=`echo "$fullname" | sed 's,/,\\\\/,g'`
			co -r"$head" "$manpage"
			chmod u+w "$manpage"
			ex - "$manpage" <<eof
				/^\.TH/s/Oberon System/Oberon System: $fullname/
				wq
eof
			vi "$manpage"
			ci -r"$head"."$branch" \
				-m"new branch for $fname version" "$manpage"
			rcs -N"$version":"$head"."$branch" "$manpage"
	esac
	branch=`expr $branch + 1`
done
rcs -b"$default" "$manpage" && co "$manpage"
