diff --git a/examples/effect/Main.roc b/examples/effect/Main.roc
index 9e3dd5f506..8ad1a5f345 100644
--- a/examples/effect/Main.roc
+++ b/examples/effect/Main.roc
@@ -5,4 +5,8 @@ app "effect-example"
 
 main : Effect.Effect {}
 main =
-    Effect.after Effect.getLine \lineThisThing -> Effect.putLine lineThisThing
+    Effect.after (Effect.putLine "Enter some input:") \{} ->
+        Effect.after Effect.getLine \lineThisThing ->
+            Effect.after (Effect.putLine "You entered:") \{} ->
+                Effect.after (Effect.putLine lineThisThing) \{} ->
+                    Effect.always {}