From 5e5de3d3a7a9c0d95712a5e444ba2dceb049bc3a Mon Sep 17 00:00:00 2001
From: Eddie Kohler <ekohler@gmail.com>
Date: Thu, 5 Sep 2024 08:08:08 -0400
Subject: [PATCH] Tag style table improvement.

---
 scripts/script.js           | 2 +-
 src/settings/s_tagstyle.php | 4 ++--
 stylesheets/style.css       | 3 +++
 3 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/scripts/script.js b/scripts/script.js
index 7889479ae..ea21d97ef 100644
--- a/scripts/script.js
+++ b/scripts/script.js
@@ -14246,7 +14246,7 @@ function make_input_autogrower(e) {
             sh = make_shadow(e),
             ws = sh.scrollWidth + borderPadding;
         if (Math.max(e.scrollWidth, ws) > Math.min(minWidth, ww)) {
-            e.style.width = Math.min(ww, Math.max(ws, minWidth)) + "px";
+            e.style.width = Math.min(ww, Math.max(minWidth, ws)) + "px";
         }
     }
     return f;
diff --git a/src/settings/s_tagstyle.php b/src/settings/s_tagstyle.php
index 4695e2e70..c71b42761 100644
--- a/src/settings/s_tagstyle.php
+++ b/src/settings/s_tagstyle.php
@@ -93,7 +93,7 @@ function prepare_oblist(Si $si, SettingValues $sv) {
     static function print(SettingValues $sv) {
         echo Ht::hidden("has_tag_style", 1),
             "<p>Submissions and PC members tagged with a style name, or with an associated tag, appear in that style in lists.</p>",
-            '<table class="demargin"><tr><th></th><th class="settings-simplehead" style="min-width:8rem">Style name</th><th class="settings-simplehead">Tags</th><th></th></tr>';
+            '<table class="demargin"><thead><tr><th></th><th class="settings-simplehead" style="min-width:8rem">Style name</th><th class="settings-simplehead">Tags</th><th></th></tr></thead><tbody class="settings-tag-style-table">';
         $dt = $sv->conf->tags();
         foreach ($sv->oblist_keys("tag_style") as $ctr) {
             $style = $sv->oldv("tag_style/{$ctr}/style");
@@ -107,7 +107,7 @@ static function print(SettingValues $sv) {
                 '</td><td class="remargin-right"></td></tr>';
             TagMap::stash_ensure_pattern("tag-{$style}");
         }
-        echo Ht::unstash(), '</table>';
+        echo Ht::unstash(), '</tbody></table>';
     }
 
     private function _apply_tag_style_req(Si $si, SettingValues $sv) {
diff --git a/stylesheets/style.css b/stylesheets/style.css
index 2219f5ee4..1a713ad6c 100644
--- a/stylesheets/style.css
+++ b/stylesheets/style.css
@@ -1905,6 +1905,9 @@ th.settings-simplehead {
 .settings-draghandle:hover {
 	opacity: 1 !important;
 }
+.settings-tag-style-table input.tags {
+	width: 25rem;
+}
 hr.dropmark {
 	/* Do not use borders and margin, because margin isn't included in parent's
 	   getBorderClientRect */