This project has two homes. It is ok to work in github, still, for a better decentralized web please consider contributing (issues, PR, etc...) throught:
The Pinboard API is a way to interact programatically with your bookmarks, notes and other Pinboard data. This library wraps the API exposing functions and data structures suitable for usage in Haskell programs.
http://hackage.haskell.org/package/pinboard
https://www.stackage.org/package/pinboard
{-# LANGUAGE OverloadedStrings #-}
import Pinboard
main :: IO ()
main = do
let config = fromApiToken "api token"
result <- runPinboard config $ getPostsRecent Nothing Nothing
case result of
Right details -> print details
Left pinboardError -> print pinboardError
output:
Posts{postsDate = 2015 - 10 - 24 16 : 17 : 12 UTC,
postsUser = "jonschoning",
postsPosts =
[Post{postHref = "http://www.reddit.com/r/haskell/comments/25vj62/adventure_with_types_in_haskell_simon_peyton/",
postDescription = "Adventure with Types in Haskell - Simon Peyton Jones [1:33:36] : haskell",
postExtended = "",
postMeta = "3fe9fb05c7c37f7bb66be7b9d85599eb",
postHash = "c46b717604ef8b126dabeba97b27a36f",
postTime = 2014 - 5 - 19 3 : 35 : 55 UTC,
postShared = True,
postToRead = False,
postTags = ["spj", "video", "haskell", "typetheory"]}]}
{-# LANGUAGE OverloadedStrings #-}
import Pinboard
import Control.Lens
main :: IO ()
main = do
let config = fromApiToken "api token"
result <- runPinboard config $ getPostsRecent (Just ["haskell"]) (Just 3)
mapM_ print (result ^.. _Right . postsPostsL . traverse . postHrefL)
output:
"http://www.stephendiehl.com/posts/production.html"
"https://mail.haskell.org/mailman/listinfo"
"https://en.wikibooks.org/wiki/Haskell/Applicative_functors#A_sliding_scale_of_power"
Pinboard typeclasses and type aliases
Executes the methods defined in Pinboard.Api
Provides Pinboard Api Methods
Pinboard Data Structures returned by the Api
Lens accessors for Pinboard.ApiTypes