Attempt to fix the connection bug I'm experiencing

2022-07-12 21:18:33 +01:00
parent ba75a239e6
commit ae917a1137
5 changed files with 72 additions and 52 deletions
@@ -355,7 +355,7 @@ prod_list accl accs chars =
        '\n' -> prod_list (accl++[text accs, br [] []]) "" tl
        '\r' -> prod_list accl accs tl
        c -> prod_list (accl) (accs++(String.fromChar c)) tl
-    [] -> accl
+    [] -> accl++[text accs]
 parseContent : String -> List (Html Msg)
 parseContent content =
  let chars = String.toList content in