Commit 8770f61c authored by Rinus Plasmeijer's avatar Rinus Plasmeijer
Browse files

*** empty log message ***

parent 5daa042f
......@@ -383,6 +383,7 @@ appHSt hstfun tst=:{tasknr,myturn,html,hst}
// utility section
mkTaskNr [] = ""
mkTaskNr [i] = toString i
mkTaskNr [i:is] = toString i <+++ "." <+++ mkTaskNr is
incTask tst = {tst & tasknr = incTasknr tst.tasknr}
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment