Permalink
Browse files

Newline on end of assertions

  • Loading branch information...
1 parent 4f4eba0 commit c0abd64c28c11d9132272a1903b71025615c2343 @singpolyma committed Mar 23, 2013
Showing with 1 addition and 1 deletion.
  1. +1 −1 Application.hs
View
@@ -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 [

0 comments on commit c0abd64

Please sign in to comment.