File: example.hs

package info (click to toggle)
haskell-fb 1.2.1-2
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, buster, sid
  • size: 220 kB
  • sloc: haskell: 2,471; makefile: 2
file content (13 lines) | stat: -rw-r--r-- 324 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
{-# LANGUAGE OverloadedStrings #-}

import qualified Facebook as FB

import Network.HTTP.Conduit (withManager)
import Control.Monad.IO.Class (liftIO)

main :: IO ()
main = do
  withManager $ \manager -> do
    FB.runNoAuthFacebookT manager $ do
       u <- FB.getUser "zuck" [] Nothing
       liftIO $ print (FB.userName u)