! $Header$

cluster.wcChildren:		toplevel

! Program resources

! Widget tree

*toplevel.wcClass:		xmBulletinBoardWidgetClass
*toplevel.wcChildren:		buttons, clusters, machines

*buttons.wcConstructor:		XmCreateMenuBar
*buttons.wcClass:		formWidgetClass
*buttons.wcChildren:		fileMenu, cluMenu, macMenu, helpMenu, \
				file, cluButton, macButton, help

*file.wcConstructor:		XmCreateCascadeButton
*file.subMenuId:		*fileMenu
*file.mnemonic:			F
*fileMenu.wcConstructor:	XmCreatePulldownMenu
*fileMenu.wcManaged:		False
*fileMenu.wcCallback:		WcSetValueCB(*file.subMenuID: this)
*fileMenu.wcChildren:		quit

*quit.wcConstructor:		XmCreateCascadeButton
*quit.labelString:		Quit
*quit.mnemonic:			Q
*quit.callback:			WcExitCB(0)

*clu.wcConstructor:		XmCreateCascadeButton
*clu.subMenuId:			*cluMenu
*clu.mnemonic:			C
*cluMenu.wcConstructor:		XmCreatePulldownMenu
*cluMenu.wcManaged:		False
*cluMenu.wcCallback:		WcSetValueCB(*clu.subMenuID: this)
*cluMenu.wcChildren:		fetch

*fetch.wcConstructor:		XmCreateCascadeButton
*fetch.labelString:		Fetch
*fetch.callback:		getClusters

*mac.wcConstructor:		XmCreateCascadeButton
*mac.subMenuId:			*macMenu
*mac.mnemonic:			M
*macMenu.wcConstructor:		XmCreatePulldownMenu
*macMenu.wcManaged:		False
*macMenu.wcCallback:		WcSetValueCB(*mac.subMenuID: this)
*macMenu.wcChildren:		fetch


*help.wcConstructor:		XmCreateCascadeButton
*help.subMenuId:		*helpMenu
*help.mnemonic:			H
*helpMenu.wcConstructor:	XmCreatePulldownMenu
*helpMenu.wcManaged:		False
*helpMenu.wcCallback:		WcSetValueCB(*help.subMenuID: this)
*helpMenu.wcChildren:		fetch


*clusters.wcClass:		formWidgetClass
*clusters.wcChildren:		clutitle, cget, cclear, \
				clufltrl, clufilter, clusterlist
*clusters.fromVert:		*buttons

*clutitle.wcClass:		labelWidgetClass
*clutitle.label:		Clusters
*clutitle.borderWidth:		0
*cget.wcClass:			commandWidgetClass
*cget.fromVert:			*clutitle
*cget.label:			get
*cget.callback:			getClusters
*cclear.wcClass:		commandWidgetClass
*cclear.fromVert:		*clutitle
*cclear.fromHoriz:		*cget
*cclear.label:			clear
!*cclear.callback:		
*clufltrl.wcClass:		labelWidgetClass
*clufltrl.label:		filter:
*clufltrl.fromVert:		*cget
*clufltrl.borderWidth:		0
*clufilter.wcClass:		asciiTextWidgetClass
*clufilter.fromVert:		*cget
*clufilter.fromHoriz:		*clufltrl
*clufilter*length:		8
*clufilter*string:		*
*clufilter*editType:		edit
*clufilter*useStringInPlace:	True

*clusterlist.wcClass:		listWidgetClass
*clusterlist.fromVert:		*clufilter
*clusterlist.Columns:		1
*clusterlist.height:		300
*clusterlist.width:		200
*clusterlist.numberStrings:	0
*clusterlist.verticalList:	True
!*clusterlist*scrollVertical:	always
!*clusterlist*displayCaret:	False
!*clusterlist*editType:		edit

*machines.wcClass:		formWidgetClass
*machines.wcChildren:		mactitle, macfltrl, macfilter, machinelist
*machines.fromVert:		*buttons
*machines.fromHoriz:		*clusters

*mactitle.wcClass:		labelWidgetClass
*mactitle.label:		Machines
*mactitle.borderWidth:		0
*macfltrl.wcClass:		labelWidgetClass
*macfltrl.label:		filter:
*macfltrl.fromVert:		*mactitle
*macfltrl.borderWidth:		0
*macfilter.wcClass:		asciiTextWidgetClass
*macfilter.fromVert:		*mactitle
*macfilter.fromHoriz:		*macfltrl
*macfilter*length:		8
*macfilter*string:		*
*macfilter*editType:		edit
*macfilter*useStringInPlace:	True

*machinelist.wcClass:		asciiTextWidgetClass
*machinelist.fromVert:		*macfilter
*machinelist.height:		300
*machinelist.width:		200
*machinelist*scrollVertical:	always
*machinelist*displayCaret:	False