-</pre><hr/><ul>"
- for p (${(oi)=${backs[$page]}}) {
- getrel $page $p
- print "<li><a href=\"${REPLY}.html\">$p</a> <sup>${pages[$p]}</sup></li>"
+</pre>"
+ local bs=(${(oi)=${backs[$page]}})
+ if [[ $bs ]]; then
+ print "<hr/><ul>"
+ for p (${(oi)=${backs[$page]}}) {
+ getrel $page $p
+ print "<li><a href=\"${REPLY}.html\">$p</a> <sup>${pages[$p]}</sup></li>"
+ }
+ print "</ul>"
+ fi
+ print "</body></html>"
+}
+
+zmodload -F zsh/datetime b:strftime
+now=$(strftime "%F %T")
+
+genIndex() {
+ local p
+ local entries=()
+ typeset -aU cats=()
+ local curdepth=${#${(s:/:)1}}
+ (( curdepth = curdepth + 1 ))
+ for p (${(oi)${(k)pages[(I)$1*]}}) {
+ [[ $p =~ "/Index$" ]] && continue
+ case ${#${(As:/:)p}} in
+ ($curdepth) entries=($entries "[$p] (${pages[$p]})") ;;
+ ( $(( $curdepth + 1 )) ) cats=(${1}${${p#$1}%%/*} $cats) ;;
+ (*) continue ;;
+ esac