easy-help: 'Values:' accepts multi-line input

diff --git a/extra/easy-help/easy-help.factor b/extra/easy-help/easy-help.factor
index b99f2e248c8ca820ed4adbd97a9c064a63ed34c2..1849c7330b7fa9f89f9d400cfca310d56cf176a0 100644 (file)
--- a/extra/easy-help/easy-help.factor
+++ b/extra/easy-help/easy-help.factor
@@ -1,5 +1,6 @@
 
-USING: kernel multiline parser sequences splitting grouping help.markup ;
+USING: kernel multiline parser arrays
+       sequences splitting grouping help.markup ;
 
 IN: easy-help
 
@@ -52,10 +53,14 @@ IN: easy-help
 : Values:
 
   ".." parse-multiline-string
-  " \n" split
-  [ "" = not ] filter
-  2 group
+  string-lines
+  1 tail
+  [ dup "   " head? [ 4 tail ] [ ] if ] map
+  [ " " split1 [ " " first = ] trim-left 2array ] map
   \ $values prefix
   parsed
 
-  ; parsing
\ No newline at end of file
+  ; parsing
+
+
+