commas

1 files changed, 1 insertions, 1 deletions

diff --git a/src/Lib.hs b/src/Lib.hs
index 6158602..d1f6c0e 100644
--- a/src/Lib.hs
+++ b/src/Lib.hs
@@ -559,7 +559,7 @@ instance ToHtml HomeView where
             where
                 homeBody = div_ $ do
                     p_ $ toHtmlRaw $ T.pack
-                        "The passerine sorcerer, Roseacrucis, aims to destroy the connections between\
+                        "The passerine sorcerer Roseacrucis aims to destroy the connections between\
                         \ the Library’s lines of poetry. If he is not stopped, each line will face\
                         \ a lifetime adrift at sea, by itself and without any context."
                     p_ $ toHtmlRaw $ T.pack "Your task is to strengthen the network of invisible edges between each line\