fix list stuff

git-svn-id: file:///raid/svn-personal/docgen/trunk@17 44bc13e5-44cb-984e-b856-1907bf1ada44

diff --git a/docgen b/docgen
index a17db91fd30415c3686c4cb99d84270d763b9afc..69a50aa98fc1725b336fc9653776d844fd377abe 100755 (executable)
--- a/docgen
+++ b/docgen
@@ -1,7 +1,7 @@
 #!/usr/bin/env tclsh
 # $Id$
 
 #!/usr/bin/env tclsh
 # $Id$
 

-set DOCGEN_VERSION "1.03"
+set DOCGEN_VERSION "1.03A"

 set INPUT "docgen.conf"
 set dowhat ""
 set language "en"
 set INPUT "docgen.conf"
 set dowhat ""
 set language "en"


@@ -279,6 +279,9 @@ proc parse_markdown {path _result} {
                }
        }
 
                }
        }
 

+       if { "$islist" == "1" } {
+               set result(body) "$result(body)</ul>"
+       }

        if { $has_h2 == 1 } {
                set result(body) "$result(body)\n</div>"
        }
        if { $has_h2 == 1 } {
                set result(body) "$result(body)\n</div>"
        }