From bcf1accce7bc7023aeac374e70380e3dbea98733 Mon Sep 17 00:00:00 2001
From: Aleteoryx <alyx@aleteoryx.me>
Date: Sat, 30 Nov 2024 13:26:19 -0500
Subject: [PATCH] docgen cleaning

---
 bin/docgen.tcl | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/bin/docgen.tcl b/bin/docgen.tcl
index 31ef21f..0f50bac 100755
--- a/bin/docgen.tcl
+++ b/bin/docgen.tcl
@@ -14,10 +14,23 @@ set basedir \
       [file dirname \
         [dict get [info frame [info frame]] file]] ..]]
 
+foreach dir [list \
+  [file join $basedir doc doctools gen] \
+  [file join $basedir doc md]] \
+{
+  file delete -force $dir
+  file mkdir $dir
+}
+
 cd [file join $basedir src]
 
 set files [glob -nocomplain {*}$files]
 
+foreach file $files {
+  set opath [file join $basedir doc doctools gen $file]
+  file mkdir [file dirname $opath]
+}
+
 file mkdir [file join $basedir doc doctools gen]
 exec -- [file join $basedir bin docextract.tcl] -o [file join $basedir doc doctools gen] -all {*}$files
 
-- 
2.45.2