From f6a774037bef617835bd43fedf7404822220b332 Mon Sep 17 00:00:00 2001
From: ·𐑑𐑴𐑕𐑑𐑩𐑤
Date: Thu, 11 Dec 2025 16:12:16 +0000
Subject: hash match shape

---
 lib/manifest.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/manifest.ml')

diff --git a/lib/manifest.ml b/lib/manifest.ml
index 3e0dda1..9313dad 100644
--- a/lib/manifest.ml
+++ b/lib/manifest.ml
@@ -639,7 +639,7 @@ module Input' = struct
 				match Hash.codec.of_kdl input.children with
 				| Ok h ->
 					Ok h
-				| Error (`Not_found ("hash", _) :: []) ->
+				| Error [`Not_found ("hash", _)] ->
 					Ok (Hash.make ?algorithm: !default_hash_algorithm ())
 				| Error errs ->
 					Error errs
-- 
cgit v1.2.3