Hi Petr, Thanks for the review !.. I'm amending the stylistic things and resending. waitNextUrl: "++u++" "++e >> hunk ./src/URL.hs 265 >> Just var -> do >> e <- readMVar var >> modifyMVar_ urlNotifications (return . (Map.delete >> u)) >> - unless (null e) (debugFail $ "Failed to download >> URL "++u++": "++e) >> + unless (null e) $ do >> + debugMessage $ "Failed to download URL "++u++": >> "++e >> + fail e > Is this any different? > The message of debugFail is all the string you pass it as parameter.
-- Adolfo _______________________________________________ darcs-users mailing list darcs-users@darcs.net http://lists.osuosl.org/mailman/listinfo/darcs-users