From b13bcd1b140aea828d29d96fd02b4b0118984645 Mon Sep 17 00:00:00 2001
From: treectrl <treectrl>
Date: Wed, 22 Nov 2006 03:31:56 +0000
Subject: Comment added.

---
 demos/explorer.tcl   | 3 ++-
 generic/tkTreeItem.c | 4 ++--
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/demos/explorer.tcl b/demos/explorer.tcl
index 69204eb..3462030 100644
--- a/demos/explorer.tcl
+++ b/demos/explorer.tcl
@@ -1,4 +1,4 @@
-# RCS: @(#) $Id: explorer.tcl,v 1.21 2006/11/12 05:48:22 treectrl Exp $
+# RCS: @(#) $Id: explorer.tcl,v 1.22 2006/11/22 03:31:56 treectrl Exp $
 
 set Dir [file dirname [file dirname [info script]]]
 
@@ -59,6 +59,7 @@ proc DemoExplorerAux {scriptDir scriptFile} {
 
 	set ::TreeCtrl::Priv(DirCnt,$T) [llength $globDirs]
 
+	# Double-clicking a directory displays its contents.
 	set Explorer(scriptDir) $scriptDir
 	set Explorer(scriptFile) $scriptFile
 	bind DemoExplorer <Double-ButtonPress-1> {
diff --git a/generic/tkTreeItem.c b/generic/tkTreeItem.c
index 6563e08..f7753d0 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.92 2006/11/19 23:40:36 treectrl Exp $
+ * RCS: @(#) $Id: tkTreeItem.c,v 1.93 2006/11/22 03:32:12 treectrl Exp $
  */
 
 #include "tkTreeCtrl.h"
@@ -21,7 +21,7 @@ struct Column {
     int cstate;		/* STATE_xxx flags manipulated with the
 			 * [item state forcolumn] command */
     int span;		/* Number of tree-columns this column covers */
-    TreeStyle style;
+    TreeStyle style;	/* Instance style. */
     Column *next;	/* Column to the right of this one */
 };
 
-- 
cgit v0.12