oops
This commit is contained in:
parent
5c875a7080
commit
54ed2ed976
@ -257,7 +257,8 @@ acceptExternalComms myIRCState manhole =
|
||||
forever $ do
|
||||
newGift <- liftIO $ inspectManhole manhole
|
||||
-- putStrLn $ "trying to maybe send to " ++ (T.unpack .getChannel . genericAutorToNSAutor . getSewageAutor $ newGift)
|
||||
runIRCAction (mapM (\fff -> send $ Privmsg (getChannel . genericAutorToNSAutor . getSewageAutor $ newGift) $ Right fff) (nlSplit $ getSewage newGift)) myIRCState
|
||||
|
||||
runIRCAction (mapM (\fff -> send $ Privmsg (getChannel . genericAutorToNSAutor . getSewageAutor $ newGift) $ Right fff) (foldr1 (++) . map (T.chunksOf 255) . nlSplit $ getSewage newGift)) myIRCState
|
||||
|
||||
|
||||
|
||||
|
2
state
2
state
@ -1 +1 @@
|
||||
Subproject commit 45e92f9730be1928fec14edcf5a653dec05a265c
|
||||
Subproject commit acd02019cc2acba22b87c9e0a67d0f241145ad09
|
Loading…
x
Reference in New Issue
Block a user