Ignore:
Timestamp:
Aug 18, 2009, 10:30:31 AM (16 years ago)
Author:
Herwig Bauernfeind
Message:

GUI-Tools: More work on EVFSGUI V.next

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/guitools-2.0/shared/cltinit.vrs

    r315 r316  
    4040    say '  Changing into "'directory(samba.!tools)'"'
    4141
    42     /* smbd.exe */
     42    /* smbclient.exe */
    4343    samba.!smbclientexe = ""
    4444    if samba.!smbclientexe = "" then do /* in current directory? */
    4545        call charout , "  Are binaries in current directory? "
    46         ok = SysFileTree('.\smbd.exe', exist.,'FO')
     46        ok = SysFileTree('.\smbclient.exe', exist.,'FO')
    4747        say exist.0' (1 = Yes, 0 = No)'
    4848        if exist.0 = 1 then samba.!smbclientexe = exist.1
     
    5050    if samba.!smbclientexe = "" then do /* in parent directory? */
    5151        call charout , "  Are binaries in parent directory? "
    52         ok = SysFileTree('..\smbd.exe', exist.,'FO')
     52        ok = SysFileTree('..\smbclient.exe', exist.,'FO')
    5353        say exist.0' (1 = Yes, 0 = No)'
    5454        if exist.0 = 1 then samba.!smbclientexe = exist.1
     
    5656    if samba.!smbclientexe = "" then do /* in ..\BIN directory? */
    5757        call charout , "  Are binaries in ..\BIN directory? "
    58         ok = SysFileTree('..\bin\smbd.exe', exist.,'FO')
     58        ok = SysFileTree('..\bin\smbclient.exe', exist.,'FO')
    5959        say exist.0' (1 = Yes, 0 = No)'
    6060        if exist.0 = 1 then samba.!smbclientexe = exist.1
     
    6262    if samba.!smbclientexe = "" then do /* in SMB_EXE ? */
    6363        call charout , "  Are binaries in SMB_EXE path? "
    64         samba.!smbclientexe = SysSearchPath("SMB_EXE","SMBD.EXE")
     64        samba.!smbclientexe = SysSearchPath("SMB_EXE","smbclient.EXE")
    6565        if samba.!smbclientexe = "" then say "No."; else say "Yes."
    6666    end
    6767    if samba.!smbclientexe = "" then do /* in PATH ? */
    6868        call charout , "  Are binaries in PATH? "
    69         samba.!smbclientexe = SysSearchPath("PATH","SMBD.EXE")
     69        samba.!smbclientexe = SysSearchPath("PATH","smbclient.EXE")
    7070        if samba.!smbclientexe = "" then say "No."; else say "Yes."
    7171    end
    7272
    73     if samba.!smbclientexe = "" then call _ErrorBinaryNotFound " could not find smbd.exe!"
     73    if samba.!smbclientexe = "" then call _ErrorBinaryNotFound " could not find smbclient.exe!"
    7474
    7575    samba.!bin = VRParseFileName(samba.!smbclientexe,'DP')
     
    9999    samba.!smbspoolexe = samba.!bin'\smbspool.exe'
    100100    if \VRFileExists(samba.!smbspoolexe) then call _ErrorBinaryNotFound " could not find smbspool.exe!"
    101     IF options.!debug == 1 THEN say '  smbspool.exe = "'samba.!smbspoolexe'"'
     101    IF options.!debug == 1 THEN say '  smbspool.exe   = "'samba.!smbspoolexe'"'
    102102
    103103    /* smb.conf */
Note: See TracChangeset for help on using the changeset viewer.