Web.Tweet

Various utilities to tweet using the twitter api

Make sure you have a file credentials file (default the executable looks for is `.cred`) with the following info:

api-key: API_KEY

api-sec: API_SECRE

tok: OAUTH_TOKEN

tok-sec: TOKEN_SECRET

Functions to tweet

basicTweet :: String -> FilePath -> IO Int

Tweet a string given a path to credentials; return the id of the status.

basicTweet "On the airplane." ".cred"

tweetData :: Tweet -> FilePath -> IO Int

tweet, given a Tweet and path to credentials. Return id of posted tweet.

thread :: String -> [String] -> Maybe Int -> Int -> FilePath -> IO ()

thread tweets together nicely. Takes a string, a list of handles to reply to, plus the ID of the status you're replying to. If you need to thread tweets without replying, pass a Nothing as the third argument.

thread "Hi I'm back in New York!" ["friend1","friend2"] Nothing 1 ".cred"

Data type for a tweet

data Tweet

Data type for our request: consists of the status text, whether to trium user information in the response, the handles to mention, and optionally the id of the status to reply to.

Constructors

Tweet

Fields

• _status :: String
• _trimUser :: Bool
• _handles :: [String]
• _replyID :: Maybe Int

Instances

Generic Tweet

Associated Types

type Rep Tweet :: * -> *

Methods

from :: Tweet -> Rep Tweet x

to :: Rep Tweet x -> Tweet

ToJSON Tweet

Methods

toJSON :: Tweet -> Value

toEncoding :: Tweet -> Encoding

toJSONList :: [Tweet] -> Value

toEncodingList :: [Tweet] -> Encoding

Default Tweet

Methods

def :: Tweet

type Rep Tweet

type Rep Tweet = D1 (MetaData "Tweet" "Web.Tweet.Types" "clit-0.2.2.6-Az2U8mRwi1vCrEf8GEPN4Q" False) (C1 (MetaCons "Tweet" PrefixI True) ((:*:) ((:*:) (S1 (MetaSel (Just Symbol "_status") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 String)) (S1 (MetaSel (Just Symbol "_trimUser") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Bool))) ((:*:) (S1 (MetaSel (Just Symbol "_handles") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [String])) (S1 (MetaSel (Just Symbol "_replyID") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe Int))))))

trimUser :: Lens' Tweet Bool

status :: Lens' Tweet String

replyID :: Lens' Tweet (Maybe Int)

handles :: Lens' Tweet [String]

Functions to sign API requests

signRequest :: FilePath -> Request -> IO Request

Sign a request using your OAuth dev token. Uses the IO monad because signatures require a timestamp

Functions to generate a URL string from a Tweet

urlString :: Tweet -> String

Convert a tweet to a percent-encoded url for querying an API