Changeset 410
- Timestamp:
- Feb 21, 2010, 6:47:36 PM (15 years ago)
- Location:
- branches/guitools-2.0
- Files:
-
- 9 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/guitools-2.0/evfsgui/changes
r404 r410 5 5 - Fix endless loop if neither EVFS nor Netdrive is installed 6 6 under all conditions 7 - Enable WPS integration code 7 - Enable WPS integration code (partly done) 8 8 - Enable and complete printer support code 9 9 - Eventually support on-the-fly browsing of directories/files in EVFSGUI 10 11 Version 2.0.3 2010-01-29 10 - Eventually support server based logon scripts (requires REXX rpc library, 11 partly done) 12 - Opening WPS folders should be done in a separate Thread (in order not to 13 block EVFSGUI while waiting for a slow WPS folder...) 14 15 Version 2.0.3 2010-02-20 16 - Fixed: The NLV subroutine now properly falls back to the builtin (bracketed) 17 message files in case NO (not even an english message file) can be 18 found. 19 - Fixed: Open mountpoint as WPS object fully workable 20 - Fixed: Open mountpint now has a consistent behaviour with other actions 21 - Changed: Open context menu item enabled for testing (experimental) 22 - Changed: Show wait pointer while opening WPS folder 23 - Changed: CltInit: Now scans wellknown locations for Samba binaries 24 (faster at least in theory) 12 25 - Changed: In the 1.5.0 GA version of the plugin the MEMLEN, LOGFILE and 13 26 LOGLEVEL tokens are removed in order to address the problem with -
branches/guitools-2.0/evfsgui/evfsgui.VRP
r404 r410 1 1 VX-REXX OS/2 V2.14 Build B3 2 2 VRX: evfsgui.VRX 3 VXOFile: VRSPLIT 4 MacroPath: VRM:U:\Develop\Samba\guitools-2.0\evfsgui 5 EXEPath: 6 RunParameters: 7 RunDirectory: U:\Develop\Samba\guitools-2.0\evfsgui 8 VRXWindow: __VREMainWindow,1,1482,915,891,8034 9 VRXWindow: __VRESectionListWindow,1,1469,10551,8696,4794 10 VRXWindow: __VREToolsWindow,0,2517,7082,6992,1669 11 UserFile: 1 12 UserWindow: Main,1 -
branches/guitools-2.0/evfsgui/evfsgui.VRX
r404 r410 232 232 CALL NLVSetText 'MENU_CONTEXT_UNMOUNT', 'Caption', 12 233 233 CALL NLVSetText 'MENU_CONTEXT_EDIT', 'Caption', 32 234 CALL NLVSetText 'MENU_CONTEXT_OPEN', 'Caption', 94 234 235 235 236 CALL NLVSetText 'Menu_File', 'Caption', 80 … … 686 687 /* Herwig B. */ 687 688 689 CALL VRSet 'MENU_CONTEXT_OPEN', 'Visible', 1 690 688 691 IF p_mounts > 0 THEN DO 692 689 693 CALL VRSet 'MENU_CONTEXT_UNMOUNT', 'Visible', 1 690 694 CALL VRSet 'PB_UNMOUNT', 'Enabled', 1 … … 1284 1288 1285 1289 settings.!ini = inipath'\evfsgui.ini' 1286 IF options.!debug == 1 THEN SAY ' INI= "'settings.!ini'"'1290 IF options.!debug == 1 THEN SAY ' EVFSGUI INIfile = "'settings.!ini'"' 1287 1291 1288 1292 IF STREAM( settings.!ini, 'C', 'QUERY EXISTS') == '' THEN DO … … 1454 1458 /* else call VRSet 'Main', 'Visible', 1 */ 1455 1459 1460 /* in non debug versions this is normally not visible */ 1461 IF options.!debug == 1 THEN SAY ' NLV MessageFile = "'settings.!messages'"' 1462 IF options.!debug == 1 THEN SAY ' NLV HelpFile = "'settings.!helpfile'"' 1463 1456 1464 IF options.!debug == 1 THEN SAY time()' LoadSettings done' 1457 1465 RETURN … … 1467 1475 Main_Create: 1468 1476 ok = VRRedirectStdIO("OFF") 1469 options.!debug = 01477 options.!debug = 1 1470 1478 1471 1479 IF options.!debug == 1 THEN ok = VRREdirectStdIO("ON") … … 1757 1765 */ 1758 1766 Menu_Context_Open_Click: 1759 CALL VRMethod 'CN_CURRENT', 'GetRecordList', 'Selected', 'select.' 1760 IF select.0 < 1 THEN RETURN 1761 1762 userdata = VRMethod( 'CN_CURRENT', 'GetRecordAttr', select.1, 'UserData') 1767 IF options.!debug == 1 THEN SAY time()' '||"Menu_Context_Open_Click started" 1768 userdata = VRMethod( 'CN_CURRENT', 'GetRecordAttr', rh, 'UserData') 1763 1769 PARSE VAR userdata mountpoint ';' mounts ';' . 1764 1770 1765 say mountpoint 1771 1772 if length(mountpoint) > 3 then mountpoint = strip(mountpoint,'T','\') 1773 IF options.!debug == 1 THEN SAY ' Opening WPS folder "'mountpoint'"' 1774 call VRSet VRWindow(), 'Pointer', 'Wait' 1766 1775 rc = SysOpenObject(mountpoint, "DEFAULT", 1) 1776 call VRSet VRWindow(), 'Pointer', '<default>' 1777 1778 IF options.!debug == 1 THEN SAY time()' '||"Menu_Context_Open_Click done" 1767 1779 return 1768 1780 … … 1837 1849 */ 1838 1850 Menu_Help_About_Click: 1839 CALL VRMessage 'Main', VRGet("Main", "HintText")||'0D0A'x||'(c) 2007-20 09Alex Taylor and Herwig Bauernfeind',NLVGetMessage( 1 ), 'I'1851 CALL VRMessage 'Main', VRGet("Main", "HintText")||'0D0A'x||'(c) 2007-2010 Alex Taylor and Herwig Bauernfeind',NLVGetMessage( 1 ), 'I' 1840 1852 return 1841 1853 -
branches/guitools-2.0/evfsgui/evfsi_de.mkm
r349 r410 100 100 EVG0092I: Information 101 101 EVG0093I: Betriebsystem: 102 EVG0094 ?:102 EVG0094I: ~ffnen 103 103 EVG0095?: 104 104 EVG0096?: -
branches/guitools-2.0/evfsgui/evfsi_en.mkm
r349 r410 100 100 EVG0092I: Information 101 101 EVG0093I: Operating System 102 EVG0094 ?:102 EVG0094I: ~Open 103 103 EVG0095?: 104 104 EVG0096?: -
branches/guitools-2.0/evfsgui/evfsi_fr.mkm
r349 r410 105 105 EVG0092I: Informations 106 106 EVG0093I: Systme d'exploitation 107 EVG0094 ?:107 EVG0094I: ~Ouvrir 108 108 EVG0095?: 109 109 EVG0096?: -
branches/guitools-2.0/shared/cltinit.vrs
r404 r410 38 38 end 39 39 IF options.!debug == 1 THEN say ' Samba tools = "'samba.!tools'"' 40 say ' Changing into "'directory(samba.!tools)'"'40 say ' Changing into tools "'directory(samba.!tools)'"' 41 41 42 42 /* smbclient.exe */ 43 43 samba.!smbclientexe = "" 44 if samba.!smbclientexe = "" then do /* wellknown locations */ 45 WellKnown = sysBootdrive()"\ecs\system\samba;"sysBootdrive()"\samba" 46 Programs = value("PROGRAMS",,'OS2ENVIRONMENT') 47 if Programs <> "" then WellKnown = Wellknown';'Programs'\samba' 48 Tools = value("TOOLS",,'OS2ENVIRONMENT') 49 if Programs <> "" then WellKnown = Wellknown';'Tools'\samba' 50 say Wellknown 51 call charout , " Are binaries in wellknown locations? " 52 ok = VRFindFile("smbclient.exe",WellKnown) 53 if ok <> "" then say "Yes."; else say "No." 54 if ok <> "" then samba.!smbclientexe = ok 55 drop Wellknown 56 end 44 57 if samba.!smbclientexe = "" then do /* in current directory? */ 45 58 call charout , " Are binaries in current directory? " 46 59 ok = SysFileTree('.\smbclient.exe', exist.,'FO') 47 say exist.0' (1 = Yes, 0 = No)'60 if exist.0 = 1 then say "Yes."; else say "No." 48 61 if exist.0 = 1 then samba.!smbclientexe = exist.1 49 62 end … … 51 64 call charout , " Are binaries in parent directory? " 52 65 ok = SysFileTree('..\smbclient.exe', exist.,'FO') 53 say exist.0' (1 = Yes, 0 = No)'66 if exist.0 = 1 then say "Yes."; else say "No." 54 67 if exist.0 = 1 then samba.!smbclientexe = exist.1 55 68 end … … 57 70 call charout , " Are binaries in ..\BIN directory? " 58 71 ok = SysFileTree('..\bin\smbclient.exe', exist.,'FO') 59 say exist.0' (1 = Yes, 0 = No)'72 if exist.0 = 1 then say "Yes."; else say "No." 60 73 if exist.0 = 1 then samba.!smbclientexe = exist.1 61 74 end -
branches/guitools-2.0/shared/nlv.vrs
r361 r410 79 79 end 80 80 if NLVSrchDone = 0 then do /* Fallback to English */ 81 if nlv = "EN" then NLVSrchDone = 1 /* We give up and leave */ 81 if nlv = "EN" then do 82 NLVSrchDone = 1 /* We give up and leave */ 83 /* We will leave without a valid NLV file here! */ 84 end 82 85 else do 83 86 say " NLV "Suffix" File not found, falling back to EN." 84 87 nlv = "EN" 88 /* Now we repeat the whole procedure to find the EN file */ 85 89 end 86 90 end … … 96 100 msgnum = ARG( 1 ) 97 101 102 IF msgfile == '' THEN RETURN '' 98 103 IF msgnum == '' THEN RETURN '' 99 104
Note:
See TracChangeset
for help on using the changeset viewer.