combinators: fix docs for case.

diff --git a/core/combinators/combinators-docs.factor b/core/combinators/combinators-docs.factor
index 783b8209d1ef29f4cadcc9e7ff17f57a85e8756f..cabeddbbc1e71f8be99f5803d602812621d65f28 100644 (file)
--- a/core/combinators/combinators-docs.factor
+++ b/core/combinators/combinators-docs.factor
@@ -361,7 +361,7 @@ HELP: case
         "    { yes [ ] } ! Do nothing"
         "    { no [ \"No way!\" throw ] }"
         "    { maybe [ \"Make up your mind!\" print ] }"
-        "    [ \"Invalid input; try again.\" print ]"
+        "    [ drop \"Invalid input; try again.\" print ]"
         "} case"
         "Make up your mind!"
     }