diff options
| author | treectrl <treectrl> | 2006-12-06 03:58:55 (GMT) |
|---|---|---|
| committer | treectrl <treectrl> | 2006-12-06 03:58:55 (GMT) |
| commit | c37aecc13ba3eafdb0a7a3601abc30e8d7518551 (patch) | |
| tree | 108f58ed5608f21e75bd267b3ee7daeb32e0245c /generic | |
| parent | 574af6eb646fd3b1c1ebe408a64aad06d9631a98 (diff) | |
| download | tktreectrl-c37aecc13ba3eafdb0a7a3601abc30e8d7518551.zip tktreectrl-c37aecc13ba3eafdb0a7a3601abc30e8d7518551.tar.gz tktreectrl-c37aecc13ba3eafdb0a7a3601abc30e8d7518551.tar.bz2 | |
Add info to the stack trace about which item/column was involved when getting sort data failed.
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tkTreeItem.c | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/generic/tkTreeItem.c b/generic/tkTreeItem.c index 6839347..642b623 100644 --- a/generic/tkTreeItem.c +++ b/generic/tkTreeItem.c @@ -5,7 +5,7 @@ * * Copyright (c) 2002-2006 Tim Baker * - * RCS: @(#) $Id: tkTreeItem.c,v 1.96 2006/12/02 21:35:47 treectrl Exp $ + * RCS: @(#) $Id: tkTreeItem.c,v 1.97 2006/12/06 03:58:55 treectrl Exp $ */ #include "tkTreeCtrl.h" @@ -6450,6 +6450,12 @@ ItemSortCmd( &sortItem1->longValue, &sortItem1->doubleValue, &sortItem1->string) != TCL_OK) { + char msg[128]; + sprintf(msg, "\n (preparing to sort item %s%d column %s%d)", + tree->itemPrefix, walk->id, + tree->columnPrefix, TreeColumn_GetID( + Tree_FindColumn(tree, sortData.columns[i].column))); + Tcl_AddErrorInfo(interp, msg); result = TCL_ERROR; goto done; } |