World: r3wp

it does do some code interpetation, but just for generating a manifest 
for function libraries.

halfway there.

cool. Thanks for the ideas, I am going to go back and bang on it 
for the rest of the night...

same here, cya!

Is there someway to do this.. 

X: [btn: "test" [print "test"]]

view layout [ X ]

View layout X should work
(You probably don't want the colon on btn)

>> x: [btn "quit"[]]
== [btn "quit" []]
>> view layout [x]
Unknown word or style: x
>>

view layout x    -- x is already a block/.....No need to put in in 
another one.

ok, but how can i form the X code and use it within a layout?

I tend to dio something like:
 x: copy []
append x 'btn append x "quit"
Compose is useful here too for more complex layout building.

That still doesnt get my bit of view code into the layout.

unless you're building the layout.. but I'm looking to add a word 
that represents some bit of view code.

It's trickier if you've already usd layout to convert the dialect 
to VID objects -- then you need to read up on make-face and similar 
functions.
Pre build, just do things like:
x: [button "hi" [print "hello"]]
y: [button "bye" [print "goodbye"]]
z: []
append z y
append z x
view layout z
>>

>> x: [ btn "quit" [] ]
== [btn "quit" []]
>> view layout do [ x ]

I"m not just doing X, i might do Y and Z as well.

but you didn't say that ...

Terry, you probably need a lot of Composes in that case.

The Vid dialect has ti survive the Do's, so you may need to use more 
lit-words  {'button rather than button)

this works

>> x: [quit]
== [quit]
>> view layout [btn x]

You said you might need to Do it firstL
Try
 x: [quit]
 do x
to see the problem here if you do need to use do first.

Hmm, i was just wondering if there is a way to use  'words to represent 
some vid code, be it a button, area... whatever.

Yes -- but you need to append, compose or mold it to make it the 
right series of characters for Layout to understand.

depends on what you are doing you can use panel:
 view layout[ panel x panel y .. ]

another way is to use styles. if you want a customized button.

just view layout compose [(x) (y) (z)]

eFish -- note that Romano has a patch for the ctx-text object: http://www.rebol.it/~romano/#sect2.2.
 You could explore that too...

Terry, I'd suggest either 'compose or 'stylize (or 'stylize/master).

; You could set up a function or two to simplify this code:
my-styles: []
append my-styles stylize [x: btn "Quit" [quit]]
append my-styles stylize [y: btn "Print" [print 'foo]]
view layout [styles my-styles x y]

; For example -- to accumulate styles:
add-styles: func ['val spec /new /local blk][
   blk: [] if new [clear blk]
   append blk stylize head insert spec to-set-word val
]
; Usage:
my-styles: add-styles x [btn "Quit" [quit]]

Here's what I use for simple timers in layouts:

stylize/master [
    timer: sensor 1x1 rate 0:0:1 feel [
        engage: func [face action event] [
            if action = 'time [do-face face none]
        ]
    ]
]

aha, Chris thanks!  what I was looking for!

exactly what I needed to complete the undo code for my editor! Thanks 
Chris!

Styles are the way to go.  I'm adding °styles° to the °7° system.. 
idea is to have a large collection of panes, buttons, fonts etc... 
all nicely categorized and available at anytime.  If you have some 
styles (or other code), drop it into the °7° group and I'll add it 
to the library.

Hello, I have an app that calls another app with a "do %..." The 
problem is that when I want to exit from the first app after closing 
the second, I am left at a command line as if I called the app from. 
Any one know how to do a double exit?

Tried quit ?

Yes, I'm sorry, I use "quit."

Hmmm, that should work....the 2nd app hasn't redefined quit has it?

(I often redefine it like this quit: :halt so I *can* get to a console 
when a large application quits)

Ah!! That was it. Sunanda, good thinking. Now I have to figure out 
how to keep it from quitting the 2nd app but that fixed that. Thanks!

Got it working fine. Thanks Sunanda.

Chris, why don't you use stylize/styles?

It didn't occur to me when composing the sample; though I assume 
you mean within the 'add-styles function?

; For example -- to accumulate styles:
add-styles: func ['val spec /new /local blk][
   blk: [] if new [clear blk]
   stylize/styles head insert spec to-set-word val blk
]
; Usage:
my-styles: add-styles x [btn "Quit" [quit]]

Hmm, that doesn't work -- I'd need to think about it...

perhaps i do not understand what you want to do, but if the goal 
is building a growing set of styles, i think that this is the standard 
way:
x: stylize/styles [a: field] []
x: stylize/styles [b: field] x
view layout [styles x a "style a" b "style b"]

the first command could also be a more simple:
x: stylize [a: field]

The idea is to take a word! and a block! and set the word! to a style 
created using the block! -- accumulating as desired.  I've implemented 
it as a wrapper for stylize...

it is what stylize/styles already does, no?

only the word must be a set-word already in the block

Yep.  That's what my function does -- puts the word in the block 
and uses stylize.

ah, ok!

Does one know what is the used of the 'text flag ?