From 81f9458ba7c8878e3ed198c33907a553ac3b40bd Mon Sep 17 00:00:00 2001
From: Greg Pfeil <greg@technomadic.org>
Date: Fri, 5 Jul 2024 12:14:40 -0600
Subject: [PATCH] Remove a help message from an error

This silpped by in the merge.
---
 unison-cli/src/Unison/CommandLine/InputPatterns.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/unison-cli/src/Unison/CommandLine/InputPatterns.hs b/unison-cli/src/Unison/CommandLine/InputPatterns.hs
index a453f5f5a3..b3cc59fb35 100644
--- a/unison-cli/src/Unison/CommandLine/InputPatterns.hs
+++ b/unison-cli/src/Unison/CommandLine/InputPatterns.hs
@@ -2184,7 +2184,7 @@ mergeCommitInputPattern =
                 ),
       parse = \case
         [] -> Right Input.MergeCommitI
-        _ -> Left (I.help mergeCommitInputPattern)
+        args -> wrongArgsLength "no arguments" args
     }
 
 parseLooseCodeOrProject :: String -> Maybe Input.LooseCodeOrProject