wm: infra

ref: de92748c1a939d295c7675b92a0174351cf87784
dir: /docweb/

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 '<b>invalid ref '$refname'</b>'
	exit
}

if(! test -d $gitfs/$ref/tree){
	echo '	<p>No code pushed</p>
		</body>
		</html>
	'
	exit
}

cd $gitfs/$ref/tree

echo '	<p>'

echo '<p><div id="content">'

ms2html < $gitfs/$ref/tree/$file.ms
	
echo '	</div>
	</p>
	</body>
	</html>'