# check pixel to string converter
# the 2 labels should show the same colours
xtAppInitialize -class Program

xmRowColumn .r managed
xmLabel .r.l1 managed \
    -foreground #3a7 \
    -background #a73 \
    -width 200 \
    -labelString "hello there"
xmLabel .r.l2 managed \
    -width 200 \
    -labelString "hello there"

.r.l1 getValues -foreground fg -background bg
puts stdout "Fg: $fg, bg: $bg"

.r.l2 setValues -foreground $fg -background $bg

. realizeWidget

. mainLoop
