shithub: shithub

ref: e98527f9722c23dfceafe4560f5c51bd4f2a01f9
dir: shithub/list

#!/bin/rc -e

. /sys/lib/shithub/common.rc

cd $1
shift

rfork ne
nl='
'

prelude '' 'the fragrant git host'
echo '<img src="/static/'$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><a name="'$ndir'">'$ndir'</a></h3>'
		echo '<dl>'
		udir=$ndir
	}
	if(test -e $repo/.git/webpublish){
		echo '<dt><a href="/'$repo'/HEAD/info.html">'$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>'
	}
}