From a1a7ff60adc6800fce414431288e18c6026abfc2 Mon Sep 17 00:00:00 2001
From: treectrl <treectrl>
Date: Wed, 11 Aug 2004 00:28:30 +0000
Subject: Changed the directory displayed.

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

diff --git a/demos/explorer.tcl b/demos/explorer.tcl
index 6600e22..dc37de7 100644
--- a/demos/explorer.tcl
+++ b/demos/explorer.tcl
@@ -1,4 +1,4 @@
-set Dir [file dirname [info library]]
+set Dir [file dirname [file dirname [info script]]]
 
 proc DemoExplorerAux {scriptDir scriptFile} {
 
-- 
cgit v0.12