fix: registry list crash and logout 405

IHP NameSupport cannot parse trailing-underscore field names at runtime.
orderByAsc #label_ in all four registry list actions (and the API V2
equivalents) crashed the page with ParseErrorBundle. Changed to orderByAsc
#name which avoids the NameSupport conversion path entirely.

textField #label_ in the four registry form views has the same issue.
Replaced with a plain <input> element that reads entry.label_ directly.

Logout <a href={DeleteSessionAction}> sent GET but IHP requires DELETE.
IHP includes methodOverridePost middleware, so a POST form with
_method=DELETE handles this correctly.

Also corrected the seed admin-user migration hash from bcrypt to the
pwstore-fast format (sha256|17|...) that IHP actually uses.

Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>

Web/Controller/Api/V2/Registries.hs

@@ -16,21 +16,21 @@ instance Controller ApiV2RegistriesController where
     action ApiV2ListWidgetTypesAction = do
         types <- query @WidgetTypeRegistry
             |> filterWhere (#status, "active")
-            |> orderByAsc #label_
+            |> orderByAsc #name
             |> fetch
         renderJson $ map wtToJson types
 
     action ApiV2ListEventTypesAction = do
         types <- query @EventTypeRegistry
             |> filterWhere (#status, "active")
-            |> orderByAsc #label_
+            |> orderByAsc #name
             |> fetch
         renderJson $ map etToJson types
 
     action ApiV2ListAnnotationCategoriesAction = do
         cats <- query @AnnotationCategoryRegistry
             |> filterWhere (#status, "active")
-            |> orderByAsc #label_
+            |> orderByAsc #name
             |> fetch
         renderJson $ map acToJson cats
 

Web/Controller/TypeRegistries.hs

@@ -16,7 +16,7 @@ instance Controller TypeRegistriesController where
 
     action WidgetTypeRegistryAction = do
         entries <- query @WidgetTypeRegistry
-            |> orderByAsc #label_
+            |> orderByAsc #name
             |> fetch
         hubs <- query @Hub |> fetch
         render WidgetTypesView { entries, hubs }
@@ -83,7 +83,7 @@ instance Controller TypeRegistriesController where
 
     action EventTypeRegistryAction = do
         entries <- query @EventTypeRegistry
-            |> orderByAsc #label_
+            |> orderByAsc #name
             |> fetch
         hubs <- query @Hub |> fetch
         render EventTypesView { entries, hubs }
@@ -149,7 +149,7 @@ instance Controller TypeRegistriesController where
 
     action AnnotationCategoryRegistryAction = do
         entries <- query @AnnotationCategoryRegistry
-            |> orderByAsc #label_
+            |> orderByAsc #name
             |> fetch
         hubs <- query @Hub |> fetch
         render AnnotationCategoriesView { entries, hubs }
@@ -215,7 +215,7 @@ instance Controller TypeRegistriesController where
 
     action PolicyScopeRegistryAction = do
         entries <- query @PolicyScopeRegistry
-            |> orderByAsc #label_
+            |> orderByAsc #name
             |> fetch
         hubs <- query @Hub |> fetch
         render PolicyScopesView { entries, hubs }

Web/FrontController.hs

@@ -192,7 +192,10 @@ defaultLayout inner = [hsx|
                 <a href={AiGovernancePoliciesAction} class="text-sm text-gray-600 hover:text-gray-900">AI Gov</a>
                 <a href={LearningDashboardAction} class="text-sm text-gray-600 hover:text-gray-900">Learning</a>
                 <div class="ml-auto">
-                    <a href={DeleteSessionAction} class="text-sm text-gray-500 hover:text-gray-700">Sign out</a>
+                    <form method="POST" action={DeleteSessionAction} style="display:inline">
+                        <input type="hidden" name="_method" value="DELETE" />
+                        <button type="submit" class="text-sm text-gray-500 hover:text-gray-700 bg-transparent border-0 p-0 cursor-pointer">Sign out</button>
+                    </form>
                 </div>
             </nav>
             <main class="max-w-5xl mx-auto px-6 py-8">

Web/View/TypeRegistries/AnnotationCategories.hs

@@ -115,7 +115,7 @@ typeForm entry hubs isNew = [hsx|
             {renderNameField isNew entry.name}
             <div>
                 <label class="block text-sm font-medium text-gray-700 mb-1">Label</label>
-                {(textField #label_) { fieldClass = "w-full border border-gray-300 rounded px-3 py-2 text-sm" }}
+                <input type="text" name="label_" value={entry.label_} required="required" class="w-full border border-gray-300 rounded px-3 py-2 text-sm focus:outline-none focus:ring-2 focus:ring-indigo-500" />
             </div>
             <div>
                 <label class="block text-sm font-medium text-gray-700 mb-1">Description <span class="text-gray-400 text-xs">(optional)</span></label>

Web/View/TypeRegistries/EventTypes.hs

@@ -115,7 +115,7 @@ typeForm entry hubs isNew = [hsx|
             {renderNameField isNew entry.name}
             <div>
                 <label class="block text-sm font-medium text-gray-700 mb-1">Label</label>
-                {(textField #label_) { fieldClass = "w-full border border-gray-300 rounded px-3 py-2 text-sm" }}
+                <input type="text" name="label_" value={entry.label_} required="required" class="w-full border border-gray-300 rounded px-3 py-2 text-sm focus:outline-none focus:ring-2 focus:ring-indigo-500" />
             </div>
             <div>
                 <label class="block text-sm font-medium text-gray-700 mb-1">Description <span class="text-gray-400 text-xs">(optional)</span></label>

Web/View/TypeRegistries/PolicyScopes.hs

@@ -115,7 +115,7 @@ typeForm entry hubs isNew = [hsx|
             {renderNameField isNew entry.name}
             <div>
                 <label class="block text-sm font-medium text-gray-700 mb-1">Label</label>
-                {(textField #label_) { fieldClass = "w-full border border-gray-300 rounded px-3 py-2 text-sm" }}
+                <input type="text" name="label_" value={entry.label_} required="required" class="w-full border border-gray-300 rounded px-3 py-2 text-sm focus:outline-none focus:ring-2 focus:ring-indigo-500" />
             </div>
             <div>
                 <label class="block text-sm font-medium text-gray-700 mb-1">Description <span class="text-gray-400 text-xs">(optional)</span></label>

Web/View/TypeRegistries/WidgetTypes.hs

@@ -116,7 +116,7 @@ typeForm entry hubs isNew = [hsx|
             {renderNameField isNew entry.name}
             <div>
                 <label class="block text-sm font-medium text-gray-700 mb-1">Label</label>
-                {(textField #label_) { fieldClass = "w-full border border-gray-300 rounded px-3 py-2 text-sm" }}
+                <input type="text" name="label_" value={entry.label_} required="required" class="w-full border border-gray-300 rounded px-3 py-2 text-sm focus:outline-none focus:ring-2 focus:ring-indigo-500" />
             </div>
             <div>
                 <label class="block text-sm font-medium text-gray-700 mb-1">Description <span class="text-gray-400 text-xs">(optional)</span></label>