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

Timestamp:

Dec 9, 2009, 7:48:45 AM (16 years ago)

Author:

Herwig Bauernfeind

Message:

GUI-Tools: EVFSGUI Version 2.0 beta6 level code

File:

• branches/guitools-2.0/shared/cltinit.vrs (modified) (5 diffs)

branches/guitools-2.0/shared/cltinit.vrs

@@ -3 +3 @@
 /*:VRX */
 _CltInit: 
-    IF options.!debug == 1 THEN say '_CltInit() started'
-    IF options.!debug == 1 THEN say "  Checking Samba setup..."
+    IF options.!debug == 1 THEN say time()' _CltInit() started'
+    IF options.!debug == 1 THEN say '  Checking Samba Client setup...'
 
     /* debuglevel when executing Samba binaries */ 
@@ -114 +114 @@
     ok = SysMkDir(unixetc)
     ok = SysMkDir(etc'\samba')
+    ok = SysMkDir(etc'\samba\lock')
 
     /* Messages from Samba will go here */
@@ -125 +126 @@
                       else say "  No basic Samba Client setup errors detected!"
     end
-    IF options.!debug == 1 THEN say '_CltInit() done, Errorstate = 'Errorstate
+    IF options.!debug == 1 THEN say time()' _CltInit() done, Errorstate = 'Errorstate
 return
 
@@ -157 +158 @@
 /*:VRX */
 _SambaExtendSearchPath:
-    IF options.!debug == 1 THEN say '_SambaExtendSearchPath() started'
+    IF options.!debug == 1 THEN say time()' _SambaExtendSearchPath() started'
     /* Add binary and tools path to the PATH variable */
     old_path = value('PATH',, 'OS2ENVIRONMENT')
@@ -181 +182 @@
     /* ok = value('LIBPATHSTRICT','T', 'OS2ENVIRONMENT') */
     
-    IF options.!debug == 1 THEN say '_SambaExtendSearchPath() done'
+    IF options.!debug == 1 THEN say time()' _SambaExtendSearchPath() done'
 return