Changeset 347 for branches/guitools-2.0/shared/cltinit.vrs

Timestamp:

Nov 15, 2009, 7:02:45 PM (16 years ago)

Author:

Herwig Bauernfeind

Message:

GUI-Tools: EVFSGUI Version 2.0 beta5 level code

File:

• branches/guitools-2.0/shared/cltinit.vrs (modified) (1 diff)

branches/guitools-2.0/shared/cltinit.vrs

@@ -106 +106 @@
     IF options.!debug == 1 THEN say '  Samba smb.conf = "'samba.!smbconf'"'
 
+    /* upcase table files - several utilities need these */
+    if (\VRFileExists(samba.!bin'\lib\upcase.dat')) |,
+       (\VRFileExists(samba.!bin'\lib\lowcase.dat')) |,
+       (\VRFileExists(samba.!bin'\lib\valid.dat')) then call _ErrorDataFileNotFound 'upcase table files not present.'
+
     /* Create these directories to make sure they do exist */
     ok = SysMkDir(unixetc)