Changeset 363

Timestamp:

Dec 4, 2009 5:04:55 PM (13 years ago)

Author:

toby

Message:

# on 2000/12/22 19:44:07, toby did:
fix expload error for DOS format .EXP files

File:

• trunk/widplt (modified) (1 diff, 2 props)

trunk/widplt

@@ -59 +59 @@
     global datalist wave XY UVWP lblarr ttrange
 
-    if [expload $expnam] {
-        tk_dialog .err "EXP Error" "Error -- Unable to read $expnam" \
+    if {[expload $expnam] == -1} {
+        tk_dialog .err "EXP Error" "Warning -- Unable to read $expnam" \
                 error 0 OK
         return