diff --git a/src/UnisonShare/Page/ProjectBranchesPage.elm b/src/UnisonShare/Page/ProjectBranchesPage.elm
index aa7dc891..88f622c5 100644
--- a/src/UnisonShare/Page/ProjectBranchesPage.elm
+++ b/src/UnisonShare/Page/ProjectBranchesPage.elm
@@ -300,7 +300,7 @@ fetchBranches appContext projectRef kind query cursor =
         params =
             { kind = kind
             , searchQuery = query
-            , limit = 100
+            , limit = 32
             , cursor = cursor
             }
 
@@ -473,7 +473,7 @@ viewAt appContext branch =
         tooltip
 
 
-viewPaginationControls : ProjectRef -> { prev : Maybe Paginated.PageCursor, next : Maybe Paginated.PageCursor } -> Html msg
+viewPaginationControls : ProjectRef -> { a | prev : Maybe Paginated.PageCursor, next : Maybe Paginated.PageCursor } -> Html msg
 viewPaginationControls projectRef cursors =
     let
         toLink cursor =
@@ -552,11 +552,13 @@ tabList appContext projectRef tab =
 viewBranches : AppContext -> ProjectDetails -> Branches -> String -> Html Msg
 viewBranches appContext project branches emptyStateMessage =
     let
-        viewCard (Paginated { items }) =
-            items
+        viewCard (Paginated p) =
+            p.items
                 |> List.map (viewBranchRow appContext project)
                 |> div [ class "project-branches_list" ]
-                |> List.singleton
+                |> (\branchList ->
+                        [ div [ class "project-branches_paginated-list" ] [ branchList, viewPaginationControls project.ref p ] ]
+                   )
                 |> Card.card
                 |> Card.asContained
                 |> Card.view
diff --git a/src/UnisonShare/Paginated.elm b/src/UnisonShare/Paginated.elm
index 1f6fa4a4..37eaf533 100644
--- a/src/UnisonShare/Paginated.elm
+++ b/src/UnisonShare/Paginated.elm
@@ -52,7 +52,7 @@ toQueryParams param =
         |> Maybe.withDefault []
 
 
-view : (PageCursorParam -> Click msg) -> { prev : Maybe PageCursor, next : Maybe PageCursor } -> Html msg
+view : (PageCursorParam -> Click msg) -> { a | prev : Maybe PageCursor, next : Maybe PageCursor } -> Html msg
 view toClick cursors =
     let
         paginationButton icon click =
diff --git a/src/css/unison-share/page/project-branches-page.css b/src/css/unison-share/page/project-branches-page.css
index 26e67bcc..d56276e5 100644
--- a/src/css/unison-share/page/project-branches-page.css
+++ b/src/css/unison-share/page/project-branches-page.css
@@ -1,3 +1,10 @@
+.project-branches-page .project-branches_paginated-list {
+  display: flex;
+  flex-direction: column;
+  width: 100%;
+  gap: 0.5rem;
+}
+
 .project-branches-page .project-branches_list {
   display: flex;
   flex-direction: column;