12 lines
397 B
Plaintext
12 lines
397 B
Plaintext
|
--- ui-grabber.tcl.orig Wed Jun 9 13:29:24 1999
|
||
|
|
+++ ui-grabber.tcl Wed Jul 28 14:42:30 1999
|
||
|
|
@@ -454,6 +454,8 @@
|
||
|
|
# pack $w.f.cl.glabel $w.f.cl.label $w.f.cl.slabel \
|
||
|
|
# -side left -fill x -expand 1
|
||
|
|
|
||
|
|
+ frame $w.f.c -relief flat
|
||
|
|
+
|
||
|
|
scale $w.f.c.gscale \
|
||
|
|
-orient horizontal -width 12 -length 100 -relief groove \
|
||
|
|
-showvalue 1 -from 0 -to 255 \
|