summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorhobbs2 <hobbs2>2006-08-04 22:49:37 (GMT)
committerhobbs2 <hobbs2>2006-08-04 22:49:37 (GMT)
commitcdcbc4c8ecf459b0a8f67fe0d016ee440cfee4d9 (patch)
tree57e238a10ea82e4ff573d87e0c075af0e85a0fc3
parentc223fba263aa60fd6b10d4df30edb66cf594fb5d (diff)
downloadtktreectrl-cdcbc4c8ecf459b0a8f67fe0d016ee440cfee4d9.zip
tktreectrl-cdcbc4c8ecf459b0a8f67fe0d016ee440cfee4d9.tar.gz
tktreectrl-cdcbc4c8ecf459b0a8f67fe0d016ee440cfee4d9.tar.bz2
* generic/tkTreeCtrl.c (TreeWidgetCmd): set the tk caret when the
active item changes.
-rw-r--r--ChangeLog5
-rw-r--r--generic/tkTreeCtrl.c8
2 files changed, 12 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index 62b77bf..6dcb54a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2006-08-04 Jeff Hobbs <jeffh@ActiveState.com>
+
+ * generic/tkTreeCtrl.c (TreeWidgetCmd): set the tk caret when the
+ active item changes.
+
2006-04-05 Jeff Hobbs <jeffh@ActiveState.com>
* generic/tkTreeCtrl.c (LoupeCmd): correct loupe on OS X x86.
diff --git a/generic/tkTreeCtrl.c b/generic/tkTreeCtrl.c
index c3aba10..0cc5c31 100644
--- a/generic/tkTreeCtrl.c
+++ b/generic/tkTreeCtrl.c
@@ -7,7 +7,7 @@
* Copyright (c) 2002-2003 Christian Krone
* Copyright (c) 2003-2005 ActiveState, a division of Sophos
*
- * RCS: @(#) $Id: tkTreeCtrl.c,v 1.59 2006/04/06 00:30:55 hobbs2 Exp $
+ * RCS: @(#) $Id: tkTreeCtrl.c,v 1.60 2006/08/04 22:49:37 hobbs2 Exp $
*/
#include "tkTreeCtrl.h"
@@ -487,10 +487,16 @@ static int TreeWidgetCmd(
goto error;
}
if (item != tree->activeItem) {
+ int x, y, w, h;
+
TreeNotify_ActiveItem(tree, tree->activeItem, item);
TreeItem_ChangeState(tree, tree->activeItem, STATE_ACTIVE, 0);
tree->activeItem = item;
TreeItem_ChangeState(tree, tree->activeItem, 0, STATE_ACTIVE);
+ if (Tree_ItemBbox(tree, item, &x, &y, &w, &h) >= 0) {
+ Tk_SetCaretPos(tree->tkwin, x - tree->xOrigin,
+ y - tree->yOrigin, h);
+ }
}
break;
}