From: Nishi <nishi@nishi.boats>
Date: Sat, 5 Oct 2024 11:31:31 +0000 (+0000)
Subject: some updates
X-Git-Url: https://git.chaotic.ninja/gitweb/nishi/?a=commitdiff_plain;h=9323b333f5f82051deb7a9ae8c356e6008b1a496;p=docgen.git

some updates

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

diff --git a/docgen b/docgen
index bd3a7d6..c51fb3f 100755
--- a/docgen
+++ b/docgen
@@ -1,7 +1,7 @@
 #!/usr/bin/env tclsh
 # $Id$
 
-set DOCGEN_VERSION "1.00"
+set DOCGEN_VERSION "1.01"
 set INPUT "docgen.conf"
 set dowhat ""
 set language "en"
@@ -154,6 +154,10 @@ proc parse_markdown {path _result} {
 	set ignore 0
 
 	while { [gets $fid line] >= 0} {
+		while { [regexp {\$TCL:([^ ]+)} "$line" -> TCL_VARNAME] } {
+			global $TCL_VARNAME
+			set line "[regsub -all {\$TCL:([^ ]+)} "$line" "[set $TCL_VARNAME]"]"
+		}
 		while 1 {
 			if { $codeblock != "" } {
 				if { [regexp -- {```} "$line"] } {
@@ -408,8 +412,10 @@ proc genhtml {path} {
 	start_html $outfid "$title" "" "./"
 	if { "$language" == "jp" } {
 		puts $outfid "<h1>$title ドキュメント</h1>"
+		puts $outfid "<h2>ページリスト</h2>"
 	} else {
 		puts $outfid "<h1>$title Documentation</h1>"
+		puts $outfid "<h2>Page list</h2>"
 	}
 	global genre_
 	if { [info exists genre_] } {
diff --git a/example/input/getstarted2/index.md b/example/input/getstarted2/index.md
index 9278716..d92b840 100644
--- a/example/input/getstarted2/index.md
+++ b/example/input/getstarted2/index.md
@@ -18,6 +18,33 @@ int main(){
 }
 ```
 
+## After installing
+blah blah
+
+## Tips
+blah blah.
+
+## Tips 2
+blah blah.
+
+## Tips 3
+blah blah.
+
+## Tips 4
+blah blah.
+
+## Tips 5
+blah blah.
+
+## Tips 6
+blah blah.
+
+## Tips 7
+blah blah.
+
+## Tips 8
+blah blah.
+
 ## Links
 
 [![blah](/icon.png)](http://nishi.boats)