bdo 1.0.0 → 1.0.1
raw patch · 2 files changed
+6/−3 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- bdo.cabal +1/−1
- src/Bdo.hs +5/−2
bdo.cabal view
@@ -1,5 +1,5 @@ name: bdo-version: 1.0.0+version: 1.0.1 synopsis: Update CSS in the browser without reloading the page. description: Update CSS in the browser without reloading the page. license: BSD3
src/Bdo.hs view
@@ -43,8 +43,11 @@ | link `elem` links -> do T.hPutStrLn h "Sending link update ..." reply h' [] link hClose h'- | otherwise -> T.hPutStrLn h "That link doesn't exist in the page. To see the page's links: clients"- _ -> T.hPutStrLn h "That client isn't connected right now."+ | otherwise -> do+ T.hPutStrLn h "That link doesn't (didn't?) exist in the page. Sending anyway ..."+ reply h' [] link+ hClose h'+ _ -> do T.hPutStrLn h "That client isn't connected right now." updateCurrentClient h = do client <- readMVar currentClient case client of Nothing -> hPutStrLn h "No current client!"