wm: infra

ref: 15ae03ea862fbd3bef2fcde9c34285f8b8e8311a
dir: /doc/ps/

View raw version 
#!/bin/rc -e

. /sys/lib/shithub/common.rc

cd $1
shift

rfork ne
nl='
'

gituser=$1
repo=$2
refname=$3
file=$4

repons $gituser $repo
if(! ref=`{resolveref $refname}){
	echo 'Invalid ref '$refname''
	exit
}

if(! test -d $gitfs/$ref/tree){
	echo 'No such document'
	exit
}

cd $gitfs/$ref/tree
troff -ms $gitfs/$ref/tree/$file.ms | dpost