resolves GrammaticalFramework/gf-core/#97

2026-04-13 23:09:31 -06:00 · 2021-07-02 16:08:34 +08:00
parent d5c6aec3ec
commit d53e1713c7
1 changed files with 4 additions and 1 deletions
--- a/src/compiler/GF/Command/CommonCommands.hs
+++ b/src/compiler/GF/Command/CommonCommands.hs
@@ -170,10 +170,13 @@ commonCommands = fmap (mapCommandExec liftSIO) $ Map.fromList [
       restrictedSystem $ syst ++ " <" ++ tmpi ++ " >" ++ tmpo
       fmap fromString $ restricted $ readFile tmpo,
       -}
-       fmap fromString . restricted . readShellProcess syst $ toString arg,
+       fmap (fromStrings . lines) . restricted . readShellProcess syst . unlines $ toStrings arg,
     flags = [
       ("command","the system command applied to the argument")
       ],
+     options = [
+       ("lines","preserve input lines, and return output as a list of lines")
+       ],
     examples = [
       mkEx "gt | l | ? wc  -- generate trees, linearize, and count words"
       ]