
11 Jan
2011
11 Jan
'11
6:44 a.m.
Hi all, I had a look at actually implementing the feature this morning but got stuck on the flag parsing. How do I convert , option [] ["test-option"] ("give extra option to test executables " ++ "(no need to quote options containing spaces)") testOptions (\v flags -> flags { testOptions = v }) (reqArg' "OPT" (\x -> toFlag [x]) (fromFlagOrDefault [])) from Simple/Setup.hs to something that eventually ends up as a [PathTemplate] instead of [String]? Feels like it should be simple but GetOpt defeats me again. Johan