~singpolyma/jingle-xmpp

0e18d3ee1ba02c15c61eb75035a649fbae4cd398 — Stephen Paul Weber 2 years ago a2129a2
Expose Jingle.StoreChunks

This allows re-using the jingle data store for related cases.
4 files changed, 4 insertions(+), 4 deletions(-)

M Jingle.hs
M Jingle/Socks5Server.hs
R StoreChunks.hs => Jingle/StoreChunks.hs
M jingle.cabal
M Jingle.hs => Jingle.hs +1 -1
@@ 27,7 27,7 @@ import qualified Network.Socket         as Socket

import qualified Jingle.Socks5Server as Socks5Server
import Util
import StoreChunks
import Jingle.StoreChunks

sessionAccept :: Text -> Text -> XMPP.JID -> XML.Element -> XML.Element
sessionAccept sid contentName responder transport =

M Jingle/Socks5Server.hs => Jingle/Socks5Server.hs +1 -1
@@ 12,7 12,7 @@ import qualified UnexceptionalIO as UIO
import qualified Data.ByteString as ByteString
import qualified Network.Socket as Socket

import StoreChunks
import Jingle.StoreChunks
import Util

start :: (Unexceptional m) =>

R StoreChunks.hs => Jingle/StoreChunks.hs +1 -1
@@ 1,4 1,4 @@
module StoreChunks (storeChunks) where
module Jingle.StoreChunks (storeChunks) where

import Prelude ()
import BasicPrelude

M jingle.cabal => jingle.cabal +1 -1
@@ 22,8 22,8 @@ library
  exposed-modules:
    Jingle,
    Jingle.Socks5Server
    Jingle.StoreChunks
  other-modules:
    StoreChunks,
    Util
  build-depends:
    base >=4.11 && <4.13,