diff --git a/hbs2-git/git-hbs2/Main.hs b/hbs2-git/git-hbs2/Main.hs
index 96f7be57..17248066 100644
--- a/hbs2-git/git-hbs2/Main.hs
+++ b/hbs2-git/git-hbs2/Main.hs
@@ -183,7 +183,7 @@ pManifestList :: GitPerks m => Parser (GitCLI m ())
 pManifestList = do
   what <- argument pLwwKey (metavar "LWWREF")
   pure do
-    heads <- withState $ selectRepoHeadsFor DESC what
+    heads <- withState $ selectRepoHeadsFor ASC what
     sto   <- getStorage
     for_ heads $ \h -> runMaybeT do
 
diff --git a/hbs2-git/hbs2-git-client-lib/HBS2/Git/Client/State.hs b/hbs2-git/hbs2-git-client-lib/HBS2/Git/Client/State.hs
index 387accb8..d1597beb 100644
--- a/hbs2-git/hbs2-git-client-lib/HBS2/Git/Client/State.hs
+++ b/hbs2-git/hbs2-git-client-lib/HBS2/Git/Client/State.hs
@@ -28,6 +28,8 @@ import Data.Coerce
 
 import Streaming.Prelude qualified as S
 
+data Limit = Limit Integer
+
 data SortOrder = ASC | DESC
 
 newtype SQL a = SQL a