Newline on end of assertions

singpolyma · Mar 23, 2013 · c0abd64 · c0abd64
1 parent 4f4eba0
commit c0abd64
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Application.hs b/Application.hs
@@ -66,7 +66,7 @@ reportFor :: URI -> Connection -> RippleAddress -> Application
 reportFor _ db adr req = case gen of
 	Just x -> do
 		time <- liftIO (fmap floor getPOSIXTime :: IO Integer)
-		string ok200 disp (show time ++ ": " ++ show adr ++ " " ++ T.unpack x)
+		string ok200 disp (show time ++ ": " ++ show adr ++ " " ++ T.unpack x ++ "\n")
 	Nothing -> do
 		assertions <- liftIO $ query db (fromString "SELECT `from`, `fromFingerprint`, `to`, `at`, `asserted`, `assertion` FROM assertions WHERE `to` = ?") [adr]
 		handleAcceptTypes [