#I "./Newtonsoft.Json.8.0.3/lib/net45"
#I "./RedditSharp.1.1.12/lib/Net45"
#r "RedditSharp.dll"

// To install dependencies and to run:
//
//     $ brew install mono nuget RedditSharp
//     $ fsharpi thisfile.fsx

open System
open RedditSharp

let username = Environment.GetEnvironmentVariable("reddit_username")
let password = Environment.GetEnvironmentVariable("reddit_password")
let client_id = Environment.GetEnvironmentVariable("reddit_client_id")
let client_secret = Environment.GetEnvironmentVariable("reddit_client_secret")
let redirect_uri = "dummy"

let webAgent = new BotWebAgent(username, password, client_id, client_secret, redirect_uri)
let reddit = new Reddit(webAgent, false)
let subreddit = reddit.GetSubreddit("/r/aww")

subreddit.New |> Seq.take 5 |> Seq.iter (fun post -> printfn "%s" post.Title)