fix stupid db error

Author: jruehlow

service/postgres/init.sql

@@ -398,8 +398,8 @@ CREATE INDEX idx_text_paragraph_era
 CREATE INDEX idx_text_paragraph_era_source_book
     ON public.text_paragraph (era, source, book);
 
-CREATE INDEX idx_text_paragraph_era_source_book_id
-  ON text_paragraph(era, source, book, id);
+CREATE INDEX idx_tp_era_source_book_id
+  ON public.text_paragraph(era, source, book, id);
 
 -- For replay
 CREATE INDEX idx_replay_user_id

service/src/Handler/Text.hs

@@ -13,8 +13,7 @@ import Import
 import System.Directory (doesFileExist)
 import System.Random (randomRIO)
 
-getRandomParagraph ::
-  Text -> Text -> Int -> Handler (Entity TextParagraph)
+getRandomParagraph :: Text -> Text -> Int -> Handler (Entity TextParagraph)
 getRandomParagraph era source book = do
   res <-
     runDB $