Exposes the functions necessary for interacting with the Pusher HTTP API, as well as functions for generating auth signatures for private and presence channels.

The idea is that you must create a Pusher data structure with your credentials, then your write your block of code that calls functions from this library, and finally "run" this code with the Pusher data structure you created.

The types of the functions are general enough to allow you to use the provided PusherM as the return type, or PusherT if you wish to use other monads in your applications monad transformer stack.

The functions return a MonadError type which means any can fail, and you must handle these failures in your client application. In the simplist case you can instantiate the type to an Either and case split on it.

An example of how you would use these functions:

  let
    credentials = Credentials
      { credentialsAppID = 123
      , credentialsAppKey = wrd12344rcd234
      , credentialsAppSecret = 124df34d545v
      }
  pusher <- getPusher credentials
  result <- runPusherT (trigger [Channel Public "my-channel"] "my-event" "my-data" Nothing) pusher
  case result of
    Right resp -> print resp
    Left e -> error e

There is a simple working example in the example/ directory.

See https://pusher.com/docs/rest_api for more detail on the HTTP requests.