Merge branch 'master' of github.com:digitallyinduced/ihp

digitallyinduced · May 18, 2024 · a64b784 · a64b784
2 parents 7116323 + d391ccb
commit a64b784
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/exe/IHP/CLI/NewSessionSecret.hs b/exe/IHP/CLI/NewSessionSecret.hs
@@ -12,4 +12,8 @@ main :: IO ()
 main = withUtf8 do
     (string, _) <- ClientSession.randomKey
     let encoded = Base64.encode string
-    ByteString.putStr encoded
+
+    -- Create a ByteString from a newline character.
+    let newline = Char8.pack "\n"
+    -- Append newline to encoded output and print, so it won't print `%` as a suffix on certain terminals.
+    ByteString.putStr (ByteString.append encoded newline)