;dev:moveFlagsAfterCommand: note a problem [#2328]

This commit is contained in:
Simon Michael 2025-03-06 06:56:00 -10:00
parent d47107ab7a
commit 40b40fc2c8

View File

@ -527,6 +527,9 @@ cmdargsParse desc m args0 = process m (ensureDebugFlagHasVal args0)
-- - XXX Relative order of flags is mostly but not entirely preserved, currently:
-- pre-command flags get moved to the end, after post-command flags.
--
-- XXX This function should rearrange only the args before the first --,
-- and leave the rest alone. This will avoid problems for the run command, eg.
--
moveFlagsAfterCommand :: [String] -> (String, [String], [String])
moveFlagsAfterCommand args =
case moveFlagAndVal (args, []) of