From aaaaa29d8e481848ea532cddc2a59b809357d747 Mon Sep 17 00:00:00 2001
From: Roan Horning <roan.horning@gmail.com>
Date: Sun, 15 Sep 2024 15:42:46 -0400
Subject: [PATCH 1/4] Add macro tag_to_id

---
 templates/shared-utils.tpl.html | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/templates/shared-utils.tpl.html b/templates/shared-utils.tpl.html
index 6416911..4ed3e3f 100644
--- a/templates/shared-utils.tpl.html
+++ b/templates/shared-utils.tpl.html
@@ -49,6 +49,15 @@
 <!--% iso8601_date.format(date_to_format) %-->
 <!--% END %-->
 
+<!--% MACRO tag_to_id(tag, is_index) BLOCK %-->
+<!--% tag = tag.replace('\s+','_') %-->
+<!--% IF is_index %-->
+    <!--% tag.upper %-->
+<!--% ELSE %-->
+    <!--% tag.lower %-->
+<!--% END %-->
+<!--% END %-->
+
 <!--% MACRO absolute_url(base, path) BLOCK %-->
 <!--% UNLESS base.empty %-->
     <!--% UNLESS base.substr(-1) == '/' %-->

From 31a59947319fafbe6e93b9034976af4fb109fb1b Mon Sep 17 00:00:00 2001
From: Roan Horning <roan.horning@gmail.com>
Date: Tue, 17 Sep 2024 22:24:16 -0400
Subject: [PATCH 2/4] Refactor template to use tag_to_id macro

---
 templates/shared-episode-summary.tpl.html | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/templates/shared-episode-summary.tpl.html b/templates/shared-episode-summary.tpl.html
index e9c94d3..3130ef4 100644
--- a/templates/shared-episode-summary.tpl.html
+++ b/templates/shared-episode-summary.tpl.html
@@ -14,7 +14,7 @@ from the series <em><a href="<!--% baseurl %-->series/<!--% zero_pad_left(series
 <!--% MACRO display_tags(tags) BLOCK %-->
     <span><label>Tags:</label> <em>
         <!--% FOREACH tag IN tags.csv_parse %-->
-        <a href="<!--% absolute_path(baseurl) %-->tags.html#<!--% tag.lower %-->"><!--% tag %--></a><!--% IF loop.count == loop.size %-->.<!--% ELSE %-->,<!--% END %-->
+        <a href="<!--% absolute_path(baseurl) %-->tags.html#<!--% tag_to_id(tag) %-->"><!--% tag %--></a><!--% IF loop.count == loop.size %-->.<!--% ELSE %-->,<!--% END %-->
         <!--% END %--></em>
     </span>
 <!--% END %-->

From 70d5983edeb6797b04a70ee74cd978ad77650340 Mon Sep 17 00:00:00 2001
From: Roan Horning <roan.horning@gmail.com>
Date: Tue, 17 Sep 2024 22:58:54 -0400
Subject: [PATCH 3/4] Parse db tag field with CSV parser module

The CSV parser module is being used in another
template. Make tag field parsing consistent.
---
 templates/content-tags.tpl.html | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/templates/content-tags.tpl.html b/templates/content-tags.tpl.html
index 6345329..ef3884c 100644
--- a/templates/content-tags.tpl.html
+++ b/templates/content-tags.tpl.html
@@ -5,12 +5,10 @@
 $Template::Stash::PRIVATE = undef; # Allow . in tag
 <!--% END %-->
 <!--% uniq_tag_count = 0 %-->
-<!--% comma_re = '(?x)(?:^|,\s*)(?:"((?>[^"]*)(?:""[^"]*)*)"|([^",]*))'; %-->
-<!--# 'Moka5,interview, "computer science"' -->
 <!--% FOREACH episode IN DBI.query(query_tags);
     ep_id = episode.id;
     ep_tags = episode.tags;
-    FOREACH tag_str IN ep_tags.split(comma_re);
+    FOREACH tag_str IN ep_tags.csv_parse;
         NEXT UNLESS tag_str;
         NEXT IF tag_str == '';
         tag = tag_str.lower;

From b17daba4ed4c0389dc706fcc2ab71cceb79212bd Mon Sep 17 00:00:00 2001
From: Roan Horning <roan.horning@gmail.com>
Date: Tue, 17 Sep 2024 23:03:52 -0400
Subject: [PATCH 4/4] Fix generation of tags index page

Replace white-space in ID attributes with the underscore
character. Fix generation of tags that start with the letter
k. The tag, keys, caused issues when used as a hash key.
---
 templates/content-tags.tpl.html | 21 ++++++++++++---------
 1 file changed, 12 insertions(+), 9 deletions(-)

diff --git a/templates/content-tags.tpl.html b/templates/content-tags.tpl.html
index ef3884c..d56b9b5 100644
--- a/templates/content-tags.tpl.html
+++ b/templates/content-tags.tpl.html
@@ -4,6 +4,7 @@
 <!--% PERL %-->
 $Template::Stash::PRIVATE = undef; # Allow . in tag
 <!--% END %-->
+<!--% USE String %-->
 <!--% uniq_tag_count = 0 %-->
 <!--% FOREACH episode IN DBI.query(query_tags);
     ep_id = episode.id;
@@ -12,17 +13,18 @@ $Template::Stash::PRIVATE = undef; # Allow . in tag
         NEXT UNLESS tag_str;
         NEXT IF tag_str == '';
         tag = tag_str.lower;
+		tag_index = String.new(tag).push('_');
         first_char = tag.substr(0,1);
         IF first_char == '.';
             first_char = '&#x0002E;'; # Unicode .
         END;
-        IF all_tags.${first_char}.exists(tag);
-            all_tags.${first_char}.${tag}.count = all_tags.${first_char}.${tag}.count + 1;
-            all_tags.${first_char}.${tag}.urls.push(ep_id);
+        IF all_tags.${first_char}.exists(tag_index);
+            all_tags.${first_char}.${tag_index}.count = all_tags.${first_char}.${tag_index}.count + 1;
+            all_tags.${first_char}.${tag_index}.urls.push(ep_id);
         ELSE;
-            all_tags.${first_char}.${tag}.count = 1;
+            all_tags.${first_char}.${tag_index}.count = 1;
             uniq_tag_count = uniq_tag_count + 1;
-            all_tags.${first_char}.${tag}.urls = [ep_id];
+            all_tags.${first_char}.${tag_index}.urls = [ep_id];
         END;
     END;
 END %-->
@@ -51,7 +53,7 @@ END %-->
 	<ul class="columns3">
     <!--% FOREACH first_char IN all_first %-->
         <!--% IF all_tags.${first_char} %-->
-            <li><a href="<!--% absolute_path(baseurl) %-->tags.html#<!--% all_tags.${first_char}.keys.sort.first %-->"><strong><!--% first_char %--></strong></a></li>
+            <li><a href="<!--% absolute_path(baseurl) %-->tags.html#<!--% tag_to_id(String.new(all_tags.${first_char}.keys.sort.first).chop) %-->"><strong><!--% first_char %--></strong></a></li>
         <!--% END %-->
     <!--% END %-->
 	</ul>
@@ -61,11 +63,12 @@ END %-->
 		<p class="ralign"><a href="<!--% absolute_path(baseurl) %-->tags.html#TOP">&UpArrow; Go to index</a></p>
 	        <h3>Tags beginning with '<!--% first_char %-->'</h3>
 	        <ul>
-                <!--% FOREACH tag IN all_tags.${first_char}.keys.sort %-->
+                <!--% FOREACH tag_index IN all_tags.${first_char}.keys.sort %-->
+				<!--% tag = String.new(tag_index).chop; tag_id = String.new(tag_index).chop; %-->
     	        	<li>
-    	        		<a id="<!--% tag %-->"><strong><!--% tag %--></strong></a>: 
+    	        		<a id="<!--% tag_to_id(tag_id) %-->"><strong><!--% tag %--></strong></a>: 
                         <!--% ep_links = [] %-->
-                        <!--% FOREACH ep_id IN all_tags.${first_char}.${tag}.urls.nsort;
+                        <!--% FOREACH ep_id IN all_tags.${first_char}.${tag_index}.urls.nsort;
 							ep_links.push("<a href=\"${absolute_path(baseurl)}eps/hpr" _ zero_pad_left(ep_id) _ '/index.html"'
                                 ' target="_blank" aria-label="' _ tag _
                                 ' - show ' _ ep_id _ '">' _ ep_id _ '</a>');