module Network.Lastfm.API.Venue
( getEvents, getPastEvents, search
) where
import Control.Monad.Error (runErrorT)
import Network.Lastfm
getEvents :: Venue -> Maybe FestivalsOnly -> APIKey -> Lastfm Response
getEvents venue festivalsOnly apiKey = callAPI
[ (#) (Method "venue.getEvents")
, (#) venue
, (#) festivalsOnly
, (#) apiKey
]
getPastEvents :: Venue -> Maybe FestivalsOnly -> Maybe Page -> Maybe Limit -> APIKey -> Lastfm Response
getPastEvents venue festivalsOnly page limit apiKey = callAPI
[ (#) (Method "venue.getPastEvents")
, (#) venue
, (#) festivalsOnly
, (#) page
, (#) limit
, (#) apiKey
]
search :: Venuename -> Maybe Page -> Maybe Limit -> Maybe Country -> APIKey -> Lastfm Response
search venue page limit country apiKey = callAPI
[ (#) (Method "venue.search")
, (#) venue
, (#) page
, (#) limit
, (#) country
, (#) apiKey
]