Changeset 61

Timestamp:

Dec 4, 2009 4:59:45 PM (14 years ago)

Author:

toby

Message:

# on 1999/02/19 18:17:14, toby did:
Cleanup warnings

File:

• trunk/expgui (modified) (2 diffs, 3 props)

trunk/expgui

@@ -122 +122 @@
         update
         set ans [tk_dialog .expFileErrorMsg "File Open Error" \
-                "File $expgui(expfile) does not exist" error 0 "Create" "Open other"]
+                "File [file tail $expgui(expfile)] does not exist in [file dirname $expgui(expfile)]" \
+                error 0 "Create" "Open other"]
         if $ans {set expgui(expfile) {}}
     }
@@ -405 +406 @@
         if {$expgui(changed) == 0} {
             set ans [tk_dialog .expFileErrorMsg "Reload?" \
-                    "File $expgui(expfile) has been modified by another program. \
-Do you want to load the newer version or loose the modifications \
+                    "File [file tail $expgui(expfile)] has been modified by another program. \
+Do you want to load the newer version or lose the modifications \
 by editing the current version?" \
                     warning 0 "Load new" "Continue editing"]
         } else {
             set ans [tk_dialog .expFileErrorMsg "Reload?" \
-                    "File $expgui(expfile) has been modified by another program \
+                    "File [file tail $expgui(expfile)] has been modified by another program \
 and you have made $expgui(changed) changes to this version. \
-Do you want to load the newer version or loose the modifications \
+Do you want to load the newer version or lose the modifications \
 by continuing to edit the current version?" \
                     warning 0 "Load new" "Continue editing" "Save edited version"]