From 4e749697600bab526b1cf51bcca493f6d31d2e34 Mon Sep 17 00:00:00 2001
From: nathansmith <nathansmith@posteo.com>
Date: Fri, 23 May 2025 07:43:34 -0600
Subject: Almost done with this stupidness

---
 old/html-cleaners/clean_all.scm | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100755 old/html-cleaners/clean_all.scm

(limited to 'old/html-cleaners/clean_all.scm')

diff --git a/old/html-cleaners/clean_all.scm b/old/html-cleaners/clean_all.scm
new file mode 100755
index 0000000..82091d9
--- /dev/null
+++ b/old/html-cleaners/clean_all.scm
@@ -0,0 +1,14 @@
+#! /usr/bin/guile \
+-e main -s
+!#
+
+(define (main args)
+  (for-each
+   (lambda (file)
+     (system (string-append "./clean_up_html.scm " file ".html"
+                            " | tidy | pandoc -f html -t org > "
+                            "org/" file ".org")))
+   '("index" "linux_room" "music_room" "nathans_philosophy"
+     "truth" "ttr" "tv_corner" "distro_guides/arch"
+     "distro_guides/fedora" "distro_guides/xfce"
+     "error/404")))
-- 
cgit v1.2.3