Overview
| Artifact ID: | 2b02fcbda31acd098701533c3c4e78fd16a4354f |
|---|---|
| Ticket: | 442474ffffffffffffffffffffffffffffffffff |
| Date: | 2001-07-18 23:35:28 |
| User: | bach |
| Artifact Attached: | 2ebca486de8da43ba334fbed0e3bd81d30db6d76 |
| Filename: | paned-diff.txt |
| Description: | diff -c format to paned.tcl from nightly-cvs bwidget-20010702.tar.gz |
Content:
*** panedw.tcl Tue Jun 12 11:01:00 2001
--- /home/bosch/bach/work/wf/bwidget/panedw.tcl Wed Jul 18 17:47:38 2001
***************
*** 25,34 ****
Widget::declare PanedWindow {
{-side Enum top 1 {top left bottom right}}
! {-width Int 10 1 "%d >=6"}
{-pad Int 4 1 "%d >= 0"}
{-background TkResource "" 0 frame}
{-bg Synonym -background}
}
variable _panedw
--- 25,35 ----
Widget::declare PanedWindow {
{-side Enum top 1 {top left bottom right}}
! {-width Int 10 1 "%d >=3"}
{-pad Int 4 1 "%d >= 0"}
{-background TkResource "" 0 frame}
{-bg Synonym -background}
+ {-activator Enum "" 1 {line button}}
}
variable _panedw
***************
*** 115,121 ****
-highlightthickness 0 -bg $bg -width $wbut -height $wbut]
set placeButton 1
set sepsize 2
! if { $::tcl_platform(platform) != "windows" } {
set activator $but
} else {
set activator $sep
--- 116,131 ----
-highlightthickness 0 -bg $bg -width $wbut -height $wbut]
set placeButton 1
set sepsize 2
!
! set activator [Widget::getoption $path -activator]
! if {$activator == ""} {
! if { $::tcl_platform(platform) != "windows" } {
! set activator button
! } else {
! set activator line
! }
! }
! if {$activator == "button"} {
set activator $but
} else {
set activator $sep