diff --git a/src/Item.hs b/src/Item.hs
index 95b18b2..6fef76e 100644
--- a/src/Item.hs
+++ b/src/Item.hs
@@ -84,7 +84,8 @@ instance Val Item where
 
 -- Database actions
 findItems :: T.Text -> Action IO [Document]
-findItems a = rest =<< find (select ["owner" =: a] "items")
+findItems a =
+  rest =<< find (select ["owner" =: a] "items") {sort = ["name" =: (1 :: Int)]}
 
 upsertItem :: Item -> Action IO ()
 upsertItem i = do