nav menu on top

[confetti] / index.cgi

diff --git a/index.cgi b/index.cgi
index 0cfa8a312eeba1030ad327588297d2bf27322e0f..7dfe9fd9353b2524f30beff93abe8ddad68e78cb 100755 (executable)
--- a/index.cgi
+++ b/index.cgi
@@ -55,8 +55,9 @@ yield_page() {
     printf '
        ] [body #top class="%s"
     ' "$class"
-    cat
+    printf '[ul .menu [li [a "/cards/" . %s]][li [a "/courses/" . %s]]]' "$(l10n cards)" "$(l10n courses)"
     [ "$message" ] && printf '[p #message\n%s\n]' "$(l10n "$message")"
+    cat
     printf '] ]'
   } \
   | "${_EXEC}/cgilite/html-sh.sed"