Tk Library Source Code

Artifact 4dcfa2bee25109800ff1b91a0c82d250c0cbd5dc:

Attachment "scrollw.tcl-1.6.0-patch" to ticket [785416ffff] added by decosterjos 2003-08-08 21:29:12.

---

53,55c53,56
<     set sw     [frame $path \
< 	    -relief flat -borderwidth 0 -background $bg \
< 	    -highlightthickness 0 -takefocus 0]
---
>     set sw     [eval frame $path \
> 	    -background $bg \
> 	    -highlightthickness 0 -takefocus 0 \
> 	    [Widget::subcget $path :cmd]]