Use captioned tables

diff --git a/zk.zsh b/zk.zsh
index c91db7178116e9384bc1ea362c57b549e2b4053b..afe5680fde6c297f63a25d7245f5ea55286b2935 100755 (executable)
--- a/zk.zsh
+++ b/zk.zsh
@@ -134,7 +134,7 @@ $data</pre>"
         fi
     fi
     if [[ $_links ]]; then
-        print "<hr/>Links:<table border=1>"
+        print "<table border=1><caption>Links</caption>"
         for p ($_links) {
             getrel $page $p
             [[ -d $p ]] && REPLY=$REPLY/index
@@ -144,7 +144,7 @@ $data</pre>"
     fi
     local bs=(${(oi)=${backs[$page]}})
     if [[ $bs ]]; then
-        print "<hr/>Backlinks:<table border=1>"
+        print "<table border=1><caption>Backlinks</caption>"
         for p ($bs) {
             getrel $page $p
             print "<tr><td><a href=\"${REPLY}.html\">$p</a></td><td><tt>${mtimes[$p]}</tt></td></tr>"
@@ -192,7 +192,7 @@ genIndex() {
     fi
     local bs=(${(oi)=${backs[$1]}})
     if [[ $bs ]]; then
-        print "<hr/>Backlinks:<table border=1>"
+        print "<table border=1><caption>Backlinks</caption>"
         for p ($bs) {
             getrel $page $p
             print "<tr><td><a href=\"${REPLY}.html\">$p</a></td><td><tt>${mtimes[$p]}</tt></td></tr>"