Feeds

Read timelines, author feeds, liked posts, and bookmarks through the Bluesky module.

All examples use taskResult {} -- see the Error Handling guide for details.

Domain Types

FeedItem

A single item in a feed or timeline, pairing a post with the reason it appeared.

FeedReason

Discriminated union indicating why a post appeared in a feed.

TimelinePost

A flattened, ergonomic view of a post. Engagement counts are plain int64 (not Option), and viewer state is exposed as simple booleans.

Page<'T>

A paginated result containing a list of items and an optional cursor for the next page.

FeedGenerator

Metadata about a custom feed generator.

Functions

Reading Feeds

SRTP: getAuthorFeed, getActorLikes, and getActorFeeds accept ProfileSummary, Profile, Handle, or Did for the actor parameter.

taskResult {
    let! page = Bluesky.getTimeline agent (Some 25L) None

    for item in page.Items do
        let author = Handle.value item.Post.Author.Handle
        printfn "@%s: %s" author item.Post.Text
}

taskResult {
    // Pass a ProfileSummary directly -- no need to extract a handle string
    let! page = Bluesky.getAuthorFeed agent someProfile (Some 25L) None

    for item in page.Items do
        printfn "%s (%d likes)" item.Post.Text item.Post.LikeCount
}

Bookmarks

SRTP: addBookmark accepts PostRef or TimelinePost. removeBookmark accepts AtUri, PostRef, or TimelinePost.

taskResult {
    let! _ = Bluesky.addBookmark agent timelinePost
    let! _ = Bluesky.removeBookmark agent timelinePost
    return ()
}

Pagination

SRTP: paginateFollowers accepts ProfileSummary, Profile, Handle, or Did for the actor parameter.

Paginators return an IAsyncEnumerable that fetches pages lazily and stops when the server returns no cursor. Iterate with await foreach:

task {
    let pages = Bluesky.paginateTimeline agent (Some 50L)

    // Consume from F# using TaskSeq or manual IAsyncEnumerator
    let enumerator = pages.GetAsyncEnumerator()

    let rec loop () = task {
        let! hasNext = enumerator.MoveNextAsync()
        if hasNext then
            match enumerator.Current with
            | Ok page ->
                for item in page.Items do
                    printfn "@%s: %s" (Handle.value item.Post.Author.Handle) item.Post.Text
            | Error err ->
                printfn "Error: %A" err
            do! loop ()
    }

    do! loop ()
    do! enumerator.DisposeAsync()
}

For endpoints without a pre-built paginator, use Xrpc.paginate directly. See the Pagination guide for full details.

Matching Feed Reasons

Match on FeedReason to distinguish reposts and pins from organic posts:

for item in page.Items do
    match item.Reason with
    | Some (FeedReason.Repost (by = reposter)) ->
        printfn "Reposted by @%s: %s"
            (Handle.value reposter.Handle) item.Post.Text
    | Some FeedReason.Pin ->
        printfn "[Pinned] %s" item.Post.Text
    | None ->
        printfn "@%s: %s" (Handle.value item.Post.Author.Handle) item.Post.Text

Custom Feeds

Custom feeds (algorithmic feeds by third parties) are identified by an AT-URI. Use Bluesky.getFeed for convenience, or the raw XRPC wrapper for full control:

taskResult {
    let! output =
        AppBskyFeed.GetFeed.query
            agent
            { Feed = feedUri; Cursor = None; Limit = Some 25L }

    for item in output.Feed do
        printfn "@%s: %s" (Handle.value item.Post.Author.Handle) item.Post.Text
}

Power Users: Raw XRPC

The raw AppBskyFeed.GetAuthorFeed.query gives access to filter and pin options:

taskResult {
    let! output =
        AppBskyFeed.GetAuthorFeed.query
            agent
            { Actor = "someone.bsky.social"
              Cursor = None
              Filter = Some AppBskyFeed.GetAuthorFeed.PostsNoReplies
              IncludePins = Some true
              Limit = Some 25L }

    for item in output.Feed do
        printfn "%s" item.Post.Text
}