diff --git a/argotk.hs b/argotk.hs
index b3fff14caf0f82797d5f4843ec255a627d93058a..de055747a52590e098a7377f3fa3dda02536b465 100755
--- a/argotk.hs
+++ b/argotk.hs
@@ -45,7 +45,7 @@ runHelloWorld :: StackArgs -> IO ()
 runHelloWorld a@StackArgs{..} = do
   let passStr = "HelloWorldFromApp"
   runSimpleStack $ a {app = format ("echo "%s) passStr}
-  readTextFile cmd_err >>= \x -> case match (has "HelloWorldFromApp") x of
+  readTextFile cmd_err >>= \x -> case match (has passStr) x of
     [] -> die ("Hello world app failed to run.")
     _  -> sh $ printInfo "The hello world app executed properly in a \
                          \container and its message was received by `cmd`.\n"