ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-15 18:12:47 +03:00
Code Issues Packages Projects Releases Wiki Activity

TODO HACK DONT COMMIT: Log to stderr

Browse Source
This commit is contained in:
Benjamin Summers 2019-12-13 02:02:10 -08:00
parent acdd9b82f5
commit c49e26d556
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pkg/king/lib/KingApp.hs
View File

@ -39,7 +39,7 @@ withLogFileHandle act = do
runApp :: RIO App a -> IO a runApp :: RIO App a -> IO a
runApp inner = do runApp inner = do
withLogFileHandle $ \logFile -> do withLogFileHandle $ \logFile -> do
logOptions <- logOptionsHandle logFile True logOptions <- logOptionsHandle stderr True
<&> setLogUseTime True <&> setLogUseTime True
<&> setLogUseLoc False <&> setLogUseLoc False
@ -78,7 +78,7 @@ instance HasNetworkConfig PierApp where
runPierApp :: PierConfig -> NetworkConfig -> RIO PierApp a -> IO a runPierApp :: PierConfig -> NetworkConfig -> RIO PierApp a -> IO a
runPierApp pierConfig networkConfig inner = do runPierApp pierConfig networkConfig inner = do
withLogFileHandle $ \logFile -> do withLogFileHandle $ \logFile -> do
logOptions <- logOptionsHandle logFile True logOptions <- logOptionsHandle stderr True
<&> setLogUseTime True <&> setLogUseTime True
<&> setLogUseLoc False <&> setLogUseLoc False