combinators: minor improvement in usage example of case word

diff --git a/core/combinators/combinators-docs.factor b/core/combinators/combinators-docs.factor
index 23ead78d94f2332d30815c2745511c0c91c77baa..9c22221e70130a1f1a8dcc3a983073adbc591980 100644 (file)
--- a/core/combinators/combinators-docs.factor
+++ b/core/combinators/combinators-docs.factor
@@ -351,14 +351,16 @@ HELP: case
     { $code "dup X = [ drop Y ] [ dup Z = [ drop T ] [ no-case ] if ] if" }
 }
 { $examples
-    { $code
-        "SYMBOL: yes  SYMBOL: no  SYMBOL: maybe"
+    { $example
+        "USING: combinators io kernel ;"
+        "SYMBOLS: yes no maybe ;"
         "maybe {"
         "    { yes [ ] } ! Do nothing"
         "    { no [ \"No way!\" throw ] }"
         "    { maybe [ \"Make up your mind!\" print ] }"
         "    [ \"Invalid input; try again.\" print ]"
         "} case"
+        "Make up your mind!"
     }
 } ;