X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=Lucu.git;a=blobdiff_plain;f=Network%2FHTTP%2FLucu%2FPreprocess.hs;h=1397950212abd91ced41b1a7b4d9293f61146a2e;hp=5e1d095151fb16b9a59e86730af5946971317638;hb=8e78bc83bfe67a376293c346ae0b30f1a684c787;hpb=858129cb755aa09da2b7bd758efb8519f2c89103 diff --git a/Network/HTTP/Lucu/Preprocess.hs b/Network/HTTP/Lucu/Preprocess.hs index 5e1d095..1397950 100644 --- a/Network/HTTP/Lucu/Preprocess.hs +++ b/Network/HTTP/Lucu/Preprocess.hs @@ -47,8 +47,6 @@ import Network.URI -} -import GHC.Conc (unsafeIOToSTM) - preprocess :: Interaction -> STM () preprocess itr = itr `seq`