Gabriele Cosmo
57 lines
1.8 KiB
Plaintext
57 lines
1.8 KiB
Plaintext
!/* +---------------------- Copyright notice -------------------------------+ */
|
|
!/* | Copyright (C) 1995, Guy Barrand, LAL Orsay, (barrand@lal.in2p3.fr) | */
|
|
!/* | Permission to use, copy, modify, and distribute this software | */
|
|
!/* | and its documentation for any purpose and without fee is hereby | */
|
|
!/* | granted, provided that the above copyright notice appear in all | */
|
|
!/* | copies and that both that copyright notice and this permission | */
|
|
!/* | notice appear in supporting documentation. This software is | */
|
|
!/* | provided "as is" without express or implied warranty. | */
|
|
!/* +---------------------- Copyright notice -------------------------------+ */
|
|
!----------------------------
|
|
begin OInterface
|
|
prefix = g4ui_
|
|
packages = Xm
|
|
end
|
|
!----------------------------
|
|
begin OWidget
|
|
name = g4ui_palette
|
|
type = XmFormDialog
|
|
children = g4ui_cmd g4ui_39 g4ui_41
|
|
autoUnmanage = false
|
|
dialogTitle = G4
|
|
end
|
|
!----------------------------
|
|
begin OWidget
|
|
name = g4ui_cmd
|
|
type = XmCommand
|
|
promptString = Commands
|
|
commandEnteredCallback = osh> G4 `get Widget thisValue`
|
|
topAttachment = attach_form
|
|
bottomAttachment = attach_widget
|
|
leftAttachment = attach_form
|
|
rightAttachment = attach_form
|
|
bottomWidget = g4ui_39
|
|
end
|
|
!----------------------------
|
|
begin OWidget
|
|
name = g4ui_39
|
|
type = XmPushButton
|
|
labelString = Cancel
|
|
activateCallback = osh> unmanageWidget `get Widget thisParent`
|
|
bottomAttachment = attach_form
|
|
leftAttachment = attach_form
|
|
rightAttachment = attach_position
|
|
rightPosition = 50
|
|
end
|
|
!----------------------------
|
|
begin OWidget
|
|
name = g4ui_41
|
|
type = XmPushButton
|
|
labelString = Help
|
|
! activateCallback = osh> help 'Commands cmds.ohtx'
|
|
bottomAttachment = attach_form
|
|
leftAttachment = attach_position
|
|
rightAttachment = attach_form
|
|
leftPosition = 50
|
|
end
|