Changeset 909 for trunk/guitools/shared/smbtree.vrs

Timestamp:

May 26, 2016, 12:51:38 PM (9 years ago)

Author:

Herwig Bauernfeind

Message:

GUITools: EVFSGUI bugfixes, license, new throbber, shared library updates

File:

• trunk/guitools/shared/smbtree.vrs (modified) (3 diffs)

trunk/guitools/shared/smbtree.vrs

@@ -27 +27 @@
     /* strip username from caption */
     UserContext = VRGet("CN_SMBTREE","Caption")
-    UserContext = DelWord(UserContext,words(UserContext))
+    UserContext = strip(DelWord(UserContext,words(UserContext)))
     
-    if UserCred = '-N' then ok = VRSet("CN_SMBTREE","Caption",UserContext': Guest')
+    if UserCred = '-N' then ok = VRSet("CN_SMBTREE","Caption",UserContext" Guest")
     else do
         parse var UserCred '--user='username'%'.
-        ok = VRSet("CN_SMBTREE","Caption",UserContext": "username)
+        ok = VRSet("CN_SMBTREE","Caption",UserContext" "username)
     end
 
@@ -61 +61 @@
     if BroadCast = 1 then BroadCast = '-b'; else BroadCast = ''
 
-    if UserCred = '-N' then ok = VRSet("CN_SMBTREE","Caption","User context: Guest")
+    if UserCred = '-N' then ok = VRSet("CN_SMBTREE","Caption",Usercontext" Guest")
     else do
         parse var UserCred '--user='username'%'.
-        ok = VRSet("CN_SMBTREE","Caption","User context: "username)
+        ok = VRSet("CN_SMBTREE","Caption", Usercontext" "username)
     end
 
@@ -197 +197 @@
     address cmd 'detach 'samba.!smbclientexe' -L "'machine'" 'UserCred' 'debuglevel' 2>'smbmachine' 1>&2'
 
-    if UserCred = '-N' then ok = VRSet("CN_SMBTREE","Caption","User context: Guest")
+    if UserCred = '-N' then ok = VRSet("CN_SMBTREE","Caption",Usercontext" Guest")
     else do
         parse var UserCred '--user='username'%'.
-        ok = VRSet("CN_SMBTREE","Caption","User context: "username)
+        ok = VRSet("CN_SMBTREE","Caption",Usercontext" "username)
     end