diff --git a/argo/src/Argo/Args.hs b/argo/src/Argo/Args.hs index 1f98bb7f2ce15173df0207fd7b6f500656c2c506..33406dd8353c9870ea911373cb0ba57f339428b9 100644 --- a/argo/src/Argo/Args.hs +++ b/argo/src/Argo/Args.hs @@ -54,7 +54,7 @@ behaviorOption = option behavior instance Default StackArgs where def = StackArgs - { verbosity = Verbose + { verbosity = Normal , app = AppName "ls" , args = AppArgs [] , containerName = ContainerName "testContainer" diff --git a/argo/src/Argo/Stack.hs b/argo/src/Argo/Stack.hs index a57a9f134dd5b7c64aa3efba6ad01b52e63c3153..5bb14867aea2b1009db56a0baf8011c17e18733d 100644 --- a/argo/src/Argo/Stack.hs +++ b/argo/src/Argo/Stack.hs @@ -227,6 +227,8 @@ runStack a@StackArgs {..} = do <> "\n" ) + cd "../" + return $ case snd out of (_ , Left PatternMatched) -> FoundMessage (stacki, Right (e, _, _) ) -> Died stacki e