#!/usr/bin/X11/mofe --f
# small example script to demonstrate the Layout widget 
# Gustaf Neumann  March 8, 1993

set Layout {vertical {
	space = (height label/2)
	$space <+inf -100%>
	horizontal {
		$space <-100%>
		label
		$space <+inf -100%>
        }
	$space <+inf -100%>
	horizontal {
		$space <-100%>
		textInsertionField
		$space <+inf -100%>
        }
	$space <+inf -100%>
	horizontal {
		$space <-100%>
		button1
		(3*$space) <+inf -100%>
		button2
		$space <-100%>
        }
	$space <+inf -100%>
  }}

mergeResources topLevel \
	*XmTextField*background white \
	*.background gray90 \
         *l.layout $Layout

#mMainWindow top topLevel \
#    scrollBarDisplayPolicy AS_NEEDED scrollingPolicy AUTOMATIC \
#    width 200 height 400
layout l topLevel
  mLabel label l labelString "Label Widget" 
  mTextField textInsertionField l width 300
  mPushButton button1 l labelString "Button 1" 
  mPushButton button2 l labelString Quit activateCallback quit
#sV top workWindow l

realize



