Fix merge

(cherry picked from commit 582aaf6)
hercules-ci · Jan 17, 2024 · 4b37656 · 4b37656
1 parent 693eed5
commit 4b37656
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/Options/Applicative/BashCompletion.hs b/src/Options/Applicative/BashCompletion.hs
@@ -125,7 +125,7 @@ bashCompletionQuery pinfo pprefs features ws i _ = case runCompletion compl ppre
     --
     -- For options and flags, ensure that the user
     -- hasn't disabled them with `--`.
-    opt_completions :: forall a. ArgPolicy -> ArgumentReachability -> Option a -> IO [String]
+    opt_completions :: forall a. ArgPolicy -> ArgumentReachability -> Option a -> IO [CompletionItem]
     opt_completions argPolicy reachability opt = case optMain opt of
       OptReader ns _ _
          | argPolicy /= AllPositionals
@@ -134,7 +134,7 @@ bashCompletionQuery pinfo pprefs features ws i _ = case runCompletion compl ppre
         -> return []
       BiOptReader ns _ _ _
          | argPolicy /= AllPositionals
-        -> return . add_opt_help opt $ show_names ns
+        -> return . fmap legacyCompletionItem . add_opt_help opt $ show_names ns
          | otherwise
         -> return []
       MapReader _f optr -> opt_completions argPolicy reachability (opt { optMain = optr })