brushing up auto-update according to hlint.
commit4512f1723fc2290a2a12ec9cb7fb617cdb505361
authorKazu Yamamoto <kazu@iij.ad.jp>
dateMon 6 Oct 2014, 10:48 (12 years ago)
parent907bc53
auto-update/Control/AutoUpdate.hs+1−1
@@ -102,7 +102,7 @@ mkAutoUpdate us = do
102102 case eres of
103103 Left e -> writeIORef currRef $ error $
104104 "Control.AutoUpdate.mkAutoUpdate: worker thread exited with exception: "
105− ++ (show (e :: SomeException))
105+ ++ show (e :: SomeException)
106106 Right () -> writeIORef currRef $ error $
107107 "Control.AutoUpdate.mkAutoUpdate: worker thread exited normally, "
108108 ++ "which should be impossible due to usage of infinite loop"