From 54ed2ed9761729b26d70c33c1d92d1acac6cc1f5 Mon Sep 17 00:00:00 2001
From: Jon Doe <john@bugmenot.com>
Date: Tue, 29 Sep 2020 14:55:38 +0200
Subject: [PATCH] oops

---
 src/Carrion/Plugin/IO/IRC/Client.hs | 3 ++-
 state                               | 2 +-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/Carrion/Plugin/IO/IRC/Client.hs b/src/Carrion/Plugin/IO/IRC/Client.hs
index cf1eada..4319056 100644
--- a/src/Carrion/Plugin/IO/IRC/Client.hs
+++ b/src/Carrion/Plugin/IO/IRC/Client.hs
@@ -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
 
 
 
diff --git a/state b/state
index 45e92f9..acd0201 160000
--- a/state
+++ b/state
@@ -1 +1 @@
-Subproject commit 45e92f9730be1928fec14edcf5a653dec05a265c
+Subproject commit acd02019cc2acba22b87c9e0a67d0f241145ad09