diff --git a/src/Pinboard/Api.hs b/src/Pinboard/Api.hs index 8ffe585..767e493 100644 --- a/src/Pinboard/Api.hs +++ b/src/Pinboard/Api.hs @@ -15,7 +15,8 @@ -- -- Provides Pinboard Api Access (deserializes into Haskell data structures) module Pinboard.Api - ( getPostsRecent + ( -- ** Posts + getPostsRecent , getPostsForDate , getPostsAll , getPostsDates @@ -36,7 +37,7 @@ module Pinboard.Api , getNote ) where --- ** Posts + import Pinboard.Client (pinboardJson) import Data.Text (Text) import Data.Time (UTCTime) diff --git a/src/Pinboard/ApiRequest.hs b/src/Pinboard/ApiRequest.hs index 539f92d..a245a7c 100644 --- a/src/Pinboard/ApiRequest.hs +++ b/src/Pinboard/ApiRequest.hs @@ -13,7 +13,9 @@ -- sent via Pinboard.Client, in the case you need more control -- for how the response should be processed over what Pinboard.Api provides. module Pinboard.ApiRequest - ( getPostsRecentRequest + ( + -- ** Posts + getPostsRecentRequest , getPostsForDateRequest , getPostsAllRequest , getPostsDatesRequest @@ -34,7 +36,7 @@ module Pinboard.ApiRequest , getNoteRequest ) where --- ** Posts + import Pinboard.Types (PinboardRequest(..), Param(..), ResultFormatType(..)) diff --git a/src/Pinboard/Client.hs b/src/Pinboard/Client.hs index a645309..64e0b81 100644 --- a/src/Pinboard/Client.hs +++ b/src/Pinboard/Client.hs @@ -15,7 +15,8 @@ -- Portability : POSIX ------------------------------------------------------------------------------ module Pinboard.Client - ( fromApiToken + ( -- * Config + fromApiToken , defaultPinboardConfig -- | The PinboardConfig provides authentication via apiToken , PinboardConfig(..) @@ -45,7 +46,6 @@ module Pinboard.Client , module X ) where --- * Config import Control.Monad.IO.Class import Control.Monad.Reader