From d36ed7b18ec85c7cb1e7646322fc487f9d6326bf Mon Sep 17 00:00:00 2001
From: treectrl <treectrl>
Date: Fri, 13 Aug 2004 20:22:04 +0000
Subject: Move "selection modify" call because hidden items can't be selected.

---
 demos/help.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/demos/help.tcl b/demos/help.tcl
index 0ac2526..803fd72 100644
--- a/demos/help.tcl
+++ b/demos/help.tcl
@@ -259,12 +259,12 @@ proc TreeCtrl::HelpButton1 {w x y} {
 				}
 			}
 		}
-		$w selection modify $item all
 		$w activate $item
 		foreach item2 [$w item ancestors $item] {
 			$w item expand $item2
 		}
 		$w item toggle $item
+		$w selection modify $item all
 	}
 	return
 }
-- 
cgit v0.12