From 40b40fc2c89e34a68a20e37b80e4d63ec7e75689 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Thu, 6 Mar 2025 06:56:00 -1000 Subject: [PATCH] ;dev:moveFlagsAfterCommand: note a problem [#2328] --- hledger/Hledger/Cli.hs | 3 +++ 1 file changed, 3 insertions(+) diff --git a/hledger/Hledger/Cli.hs b/hledger/Hledger/Cli.hs index d6f8c9785..f026775c8 100644 --- a/hledger/Hledger/Cli.hs +++ b/hledger/Hledger/Cli.hs @@ -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