diff options
author | Teddy Wing | 2017-08-17 00:35:24 +0200 |
---|---|---|
committer | Teddy Wing | 2017-08-17 00:35:24 +0200 |
commit | f4028e21f8a138961927b8e794b349f209b00dc7 (patch) | |
tree | f1099c1cd6ebd511a0a6d52c99c0545238be1a21 /src/Message.hs | |
parent | e9278eb0a1c0126e6903f333ed4efa5dd00ff5cc (diff) | |
download | sorbot-f4028e21f8a138961927b8e794b349f209b00dc7.tar.bz2 |
Change `Plugin` and `Message` from `String` to `Data.Text`
Use the `Data.Text` type instead of `String` in most of the places we
use it in `Plugin` and `Message`.
This allows us to more easily pass data between the IRC package. No more
kludgy `pack`s and `unpack`s in our IRC message handler.
The one thing we couldn't convert was our regex. From what I understand
(https://stackoverflow.com/questions/14922579/haskell-regular-expressions-and-data-text#14922626),
the regex library I'm using doesn't support `Data.Text`, so use
`String`s for that instead.
Diffstat (limited to 'src/Message.hs')
-rw-r--r-- | src/Message.hs | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/src/Message.hs b/src/Message.hs index 6a95638..db582e9 100644 --- a/src/Message.hs +++ b/src/Message.hs @@ -4,12 +4,14 @@ module Message , Nick ) where -type Channel = String +import qualified Data.Text as T -type Nick = String +type Channel = T.Text + +type Nick = T.Text data Message = Message - { text :: String + { text :: T.Text , channel :: Channel , nick :: Nick } |