aboutsummaryrefslogtreecommitdiff
path: root/vendor/x11iraf/guidemo/frame.gui
diff options
context:
space:
mode:
authorJoe Hunkeler <jhunkeler@gmail.com>2015-08-11 16:51:37 -0400
committerJoe Hunkeler <jhunkeler@gmail.com>2015-08-11 16:51:37 -0400
commit40e5a5811c6ffce9b0974e93cdd927cbcf60c157 (patch)
tree4464880c571602d54f6ae114729bf62a89518057 /vendor/x11iraf/guidemo/frame.gui
downloadiraf-osx-40e5a5811c6ffce9b0974e93cdd927cbcf60c157.tar.gz
Repatch (from linux) of OSX IRAF
Diffstat (limited to 'vendor/x11iraf/guidemo/frame.gui')
-rw-r--r--vendor/x11iraf/guidemo/frame.gui70
1 files changed, 70 insertions, 0 deletions
diff --git a/vendor/x11iraf/guidemo/frame.gui b/vendor/x11iraf/guidemo/frame.gui
new file mode 100644
index 00000000..c6561a7a
--- /dev/null
+++ b/vendor/x11iraf/guidemo/frame.gui
@@ -0,0 +1,70 @@
+# FRAME.GUI -- Test GUI for the frame and layout widgets.
+# This gui can be run as "cl> hello gui=frame.gui".
+
+reset-server
+appInitialize frame Frame {
+ *objects:\
+ toplevel Frame frame\
+ frame Layout panel\
+ panel Frame label1_frame\
+ label1_frame Label label1\
+ panel Frame label2_frame\
+ label2_frame Label label2\
+ panel Command button1\
+ panel Command button2
+
+ *background: gray
+ *foreground: black
+
+ *frame.highlightThickness: 0
+ *frame.frameWidth: 4
+ *frame.frameType: chiseled
+ *frame.innerOffset: 5
+ *frame.outerOffset: 5
+
+ *panel.debug: True
+ *panel.borderWidth: 0
+
+ *panel.layout: vertical {\
+ 5 < +inf - 5 > \
+ horizontal { \
+ -1 \
+ label1_frame < +inf * +inf > \
+ -1 \
+ } \
+ 5 < +inf - 5 > \
+ horizontal { \
+ -1 \
+ label2_frame < +inf * +inf > \
+ -1 \
+ } \
+ 5 < +inf - 5 > \
+ horizontal {\
+ -1 < +inf > \
+ button1 \
+ 5 < +inf -5 > \
+ button2 \
+ -1 < +inf > \
+ }\
+ 5 < +inf - 5 > \
+ }
+
+ *Label.borderWidth: 0
+ *Label.background: gray60
+ *label1*shadowWidth: 0
+ *label1_frame.frameType: sunken
+ *label1_frame.frameWidth: 2
+ *label2*shadowWidth: 0
+ *label2_frame.frameType: sunken
+ *label2_frame.frameWidth: 2
+
+ *allowShellResize: true
+ *beNiceToColormap: False
+}
+
+# Start up the GUI.
+createObjects
+activate
+
+proc quit args { send client gkey q; deactivate unmap }
+send button1 addCallback quit