35 lines
719 B
Plaintext
35 lines
719 B
Plaintext
|
# -*- sh -*-
|
||
|
|
||
|
# configuration things
|
||
|
: ${ROOT:=.} # change when publishing
|
||
|
|
||
|
# symbols (?)
|
||
|
PHI="<span class=phi>ⱷ</span>"
|
||
|
|
||
|
# functions
|
||
|
Nav() { # Nav <INDEX> <files...>
|
||
|
idx="$1";shift
|
||
|
if [ "x$idx" != "x-" ]; then
|
||
|
echo "<a href=\"$ROOT/index.html\""
|
||
|
[ "$idx" = "$F" ] && echo "class=current"
|
||
|
echo ">acdw</a>"
|
||
|
fi
|
||
|
echo "${PHI}"
|
||
|
for post; do
|
||
|
if [ "$post" != "$idx" ]; then
|
||
|
echo "<a href=\"$ROOT/${post#*/}\""
|
||
|
[ "$post" = "$F" ] && echo "class=current"
|
||
|
echo ">$(T $post)</a>"
|
||
|
fi
|
||
|
done
|
||
|
}
|
||
|
|
||
|
alias T=sed\ q
|
||
|
|
||
|
# redefine X for better logging
|
||
|
X()(P>&2 $F;
|
||
|
eval "$(P "cat<<.";cat;P;P .)")
|
||
|
|
||
|
# MAIN
|
||
|
for F;do X<L>O/${F#I};done
|