shithub: shithub

ref: 28fb8ec96341a7523c9c2e3b51c80ebe1a56cb0d
dir: /list/

View raw version
#!/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>'$ndir'</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>'
	}
}