From 50b46a0a82e66a5bd74de06e0ec63f1baa78216e Mon Sep 17 00:00:00 2001
From: Max Wilson <wilson.max@gmail.com>
Date: Sun, 26 Nov 2023 19:44:24 -0800
Subject: [PATCH] Make sure that Github link can float all the way to the
 right, which means it can't be within a flexbox. Make it inside of a
 fullWidth div instead.

---
 main.sass                             | 3 +++
 src/UI/Components/PriestSpellsView.fs | 6 ++++--
 2 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/main.sass b/main.sass
index fd08297..dec4048 100644
--- a/main.sass
+++ b/main.sass
@@ -118,6 +118,9 @@ ul
         @media speech
             display: none
 
+.fullWidth
+    width: 100%
+
 .srcLink
     max-width: 6rem
     float: right
diff --git a/src/UI/Components/PriestSpellsView.fs b/src/UI/Components/PriestSpellsView.fs
index 707100d..1db82c3 100644
--- a/src/UI/Components/PriestSpellsView.fs
+++ b/src/UI/Components/PriestSpellsView.fs
@@ -37,8 +37,10 @@ let View() =
                 ]
             ]
         class' "scrollParent" Html.div [
-            srcLink
-            Html.h2 "Worship"
+            class' "fullWidth" Html.div [
+                srcLink
+                Html.h2 "Worship"
+                ]
             class' "scrollable" Html.ul [
                 for deity in filteredDeities filter model do
                     Html.li [prop.text (deity.name + ": " + String.join ", " [for sphere in deity.spheres -> (sphere.sphere + if sphere.access = Minor then "*" else "")])]