Question

Default Rebol VID style is eye-searing, put bluntly. I started making my own default, but ran into a snag. Namely, how do I specify styles for a sub-element of an element?

good-looking: stylize [
  field: field 
    edge [size: 1x1]
    colors [255.255.255 255.255.255]
  area: area
    edge [size: 1x1]
    colors [255.255.255 255.255.255]
  text-list: text-list
    ;text-list/sub-area/edge [size: 1x1]
]

I want all fields to have a thin border, including text-list and others. But I have no idea how to include that rule in the text-list definition.

Also, how to reduce repetition with styles, like with the colors?

Answer 1

So, first:

layout [X: field]
type? X/edge
type? X/colors

Objects should get re-made to avoid unexpected side-effects on the shared ones.

good-looking: stylize [
  field: field with [
    edge: make edge [size: 1x1]
    colors: copy [255.255.255 255.255.255]
  ]
  area: area with [
    edge: make edge [size: 1x1]
    colors: copy [255.255.255 255.255.255]
  ]
  text-list: text-list with [
    sub-area: make sub-area [
      edge: make edge [size: 1x1]
    ]
  ]
]