42 lines · 692 B · Text
RawDownload
#!/bin/rc . /sys/lib/shithub/common.rc cd $1shift rfork nenl='' http_responseprelude '' 'the fragrant git host'echo '<img src="/'$logo'" /><br/>' if(~ $#intro 0)	echo '<h2>Repositories</h2><br/>'if not	echo $intro udir=()for(repo in `$nl{ls */}){	ndir=`{basename -d $repo}	if(! ~ $udir $ndir)		echo '</dl>'	if(! ~ $udir $ndir){		echo '<h3>'$ndir'</h3>'		echo '<dl>'		udir=$ndir	}	if(test -e $repo/.git/webpublish){		echo '<dt><a href="/'$repo'/">'$repo'</a></dt>'		echo '<dd>'		if(test -f $repo/.git/desc)			htcat $repo/.git/desc		if not if(test -f $repo/.git/description)			htcat $repo/.git/description		if not			echo 'probably some code'		echo '</dd>'	}}