From: Adam Dickmeiss <adam@indexdata.dk>
Date: Wed, 10 Jun 1998 13:22:47 +0000 (+0000)
Subject: Minor changes.
X-Git-Tag: IRTCL.1.4~50
X-Git-Url: http://sru.miketaylor.org.uk/?a=commitdiff_plain;h=c5866f47a7794183f53eb764b3dcbd5f09339640;p=ir-tcl-moved-to-github.git

Minor changes.
---

diff --git a/client.tcl b/client.tcl
index 7e2ef83..9112e98 100644
--- a/client.tcl
+++ b/client.tcl
@@ -4,7 +4,10 @@
 # Sebastian Hammer, Adam Dickmeiss
 #
 # $Log: client.tcl,v $
-# Revision 1.105  1998-06-10 13:00:45  adam
+# Revision 1.106  1998-06-10 13:22:47  adam
+# Minor changes.
+#
+# Revision 1.105  1998/06/10 13:00:45  adam
 # Added ir-version command.
 #
 # Revision 1.104  1998/02/12 13:32:41  adam
@@ -4157,9 +4160,9 @@ set logLevel all
 if {[catch {ir-version}]} {
     set e [info sharedlibextension]
     .init.msg insert end "Loading irtcl$e.\n"
-    load ${libdir}/irtcl$e irtcl
+    catch {load ${libdir}/irtcl$e irtcl}
     if {[catch {ir-version}]} {
-	load irtcl$e irtcl
+	catch {load irtcl$e irtcl}
     }
 }