Capturing output from 'help

Hello All: Typing >> help next at the shell prompt gives me the following: USAGE: NEXT series DESCRIPTION: Returns the series at its next position. NEXT is an action value. ARGUMENTS: series -- (Type: series port) Now how can I capture that output as a block or other data structure? TIA tj

Hello! Here's one way. Echo to a temp file, then read the file back into a string. ;--start script--- REBOL [ Title: "Capture help" Date: 30-July-2001 Author: "doug edmunds" Purpose: "capture help output as a string." File: %capture_help.r ] temp_file: %temphelp.txt echo temp_file help next ; change 'next' to any help topic ; or part of word (i.e., help br) echo none help_string: read temp_file delete temp_file print "^/now printing help_string:" print help_string print "press any key" input ;--end script---- --doug edmunds --- Tim Johnson <[tim--johnsons-web--com]> wrote:

On Mon, Jul 30, 2001 at 06:34:36PM -0700, doug edmunds wrote:

> Hello! > Here's one way. Echo to a temp file, then > read the file back into a string.

> ;--start script--- > REBOL [ > [rebol-request--rebol--com] with "unsubscribe" in the > subject, without the quotes.

Hi Tim, I think you'll find the following code usefull : --------------------------------------- REBOL [ Title: "Console capture" Author: "Nenad Rakocevic" Email: [dockimbel--free--fr] Date: 31-Jul-2001 File: %capture.r Version: 1.0.0 ] ctx-console-capture: context [ out: none sys-print: get in system/words 'print sys-prin: get in system/words 'prin set 'get-captured does [out] print-out: func [value][append out reform [reduce value newline]] prin-out: func [value][append out reform value] set 'capture func [flag [logic!]][ either flag [ out: make string! 1024 set 'print :print-out set 'prin :prin-out ][ set 'print :sys-print set 'prin :sys-prin ] ] ] ---------------------------------------

>> do %capture.r >> capture on >> help next >> capture off >> print get-captured