summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorfvogelnew1@free.fr <fvogel>2015-05-24 13:10:45 (GMT)
committerfvogelnew1@free.fr <fvogel>2015-05-24 13:10:45 (GMT)
commit9423542c0e840426f5c4322e775a6a110dec99ae (patch)
tree5e5802b8f0e5c3f97bcfac7929216682fafed6eb /generic
parent5a69a6ae109ece6ba215d24e3b0d0f1c8671a1dd (diff)
downloadtk-9423542c0e840426f5c4322e775a6a110dec99ae.zip
tk-9423542c0e840426f5c4322e775a6a110dec99ae.tar.gz
tk-9423542c0e840426f5c4322e775a6a110dec99ae.tar.bz2
Limit sash proxy maximum coordinates to the size of the panedwindow it belongs to
Diffstat (limited to 'generic')
-rw-r--r--generic/tkPanedWindow.c12
1 files changed, 11 insertions, 1 deletions
diff --git a/generic/tkPanedWindow.c b/generic/tkPanedWindow.c
index 3ae473a..e07fc51 100644
--- a/generic/tkPanedWindow.c
+++ b/generic/tkPanedWindow.c
@@ -2764,6 +2764,7 @@ PanedWindowProxyCommand(
PROXY_COORD, PROXY_FORGET, PROXY_PLACE
};
int index, x, y, sashWidth, sashHeight;
+ int internalBW, pwWidth, pwHeight;
Tcl_Obj *coords[2];
if (objc < 3) {
@@ -2813,11 +2814,16 @@ PanedWindowProxyCommand(
return TCL_ERROR;
}
+ internalBW = Tk_InternalBorderWidth(pwPtr->tkwin);
if (pwPtr->orient == ORIENT_HORIZONTAL) {
if (x < 0) {
x = 0;
}
- y = Tk_InternalBorderWidth(pwPtr->tkwin);
+ pwWidth = Tk_Width(pwPtr->tkwin) - (2 * internalBW);
+ if (x > pwWidth) {
+ x = pwWidth;
+ }
+ y = Tk_InternalBorderWidth(pwPtr->tkwin);
sashWidth = pwPtr->sashWidth;
sashHeight = Tk_Height(pwPtr->tkwin) -
(2 * Tk_InternalBorderWidth(pwPtr->tkwin));
@@ -2825,6 +2831,10 @@ PanedWindowProxyCommand(
if (y < 0) {
y = 0;
}
+ pwHeight = Tk_Height(pwPtr->tkwin) - (2 * internalBW);
+ if (y > pwHeight) {
+ y = pwHeight;
+ }
x = Tk_InternalBorderWidth(pwPtr->tkwin);
sashHeight = pwPtr->sashWidth;
sashWidth = Tk_Width(pwPtr->tkwin) -