dev-tcltk/blt/files/blt-2.5.3-clang-treeview-node.patch


1
2
3
4
5
6
7
8
9
10
11

--- a/generic/bltTreeViewCmd.c
+++ b/generic/bltTreeViewCmd.c
@@ -6533,7 +6533,7 @@
         Tcl_Obj *listObjPtr, *objPtr;
         if (tvPtr->selAnchorPtr == NULL) return TCL_OK;
         listObjPtr = Tcl_NewListObj(0, (Tcl_Obj **)NULL);
-        objPtr = NodeToObj(tvPtr->selAnchorPtr);
+        objPtr = NodeToObj(tvPtr->selAnchorPtr->node);
         Tcl_ListObjAppendElement(interp, listObjPtr, objPtr);
         if (tvPtr->selAnchorCol != NULL) {
             objPtr = Tcl_NewStringObj( tvPtr->selAnchorCol->key, -1);