X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=setup.tcl;h=8f4464733052009f802c126bde587ca6c3befdc5;hb=dde6d6ec7c6d85fab50cfb3168193309fd136ba0;hp=227a7c513ed08f7badcd8fb8e9136f7a7213d68c;hpb=82eb3636954f41a598430ddafcc21d168006d4a3;p=ir-tcl-moved-to-github.git

diff --git a/setup.tcl b/setup.tcl
index 227a7c5..8f44647 100644
--- a/setup.tcl
+++ b/setup.tcl
@@ -6,7 +6,10 @@
 # Configuration Driver
 #
 # $Log: setup.tcl,v $
-# Revision 1.5  1998-04-02 14:32:01  adam
+# Revision 1.6  1999-12-12 00:25:59  adam
+# Updated list of preconfigure targets.
+#
+# Revision 1.5  1998/04/02 14:32:01  adam
 # Minor changes to EXPLAIN driver.
 #
 # Revision 1.4  1998/02/12 13:32:42  adam
@@ -66,7 +69,7 @@ proc protocol-setup-action {target} {
     
     set timedef $profileS($target,timeDefine)
     if {![string length $timedef]} {
-        set timedef [clock seconds]
+	set profileS($target,timeDefine) [clock seconds]
     }
 
     foreach n [array names profileS $target,*] {