Changeset 72 for trunk/gui/printer

Timestamp:

Dec 1, 2018, 4:40:33 PM (7 years ago)

Author:

Alex Taylor

Message:

Fix some errors exposed by Object REXX

Location:

trunk/gui/printer/manager

Files:

• PRINTOOL.VRP (modified) (1 diff)
• PRINTOOL.VRX (modified) (6 diffs)

trunk/gui/printer/manager/PRINTOOL.VRP

@@ -6 +6 @@
 RunParameters: /D
 RunDirectory: 
-VRXWindow: __VREMainWindow,1,927,4288,6697,8046
-VRXWindow: __VREFileListWindow,0,2264,6504,2665,3358
-VRXWindow: __VRESectionListWindow,1,1036,16044,4204,4059
-VRXWindow: __VREToolsWindow,1,1060,14309,5475,1665
-VRXWindow: __VREWindListWindow,1,5276,16044,3505,4059
+VRXWindow: __VREMainWindow,1,940,4288,6697,8046
+VRXWindow: __VRESectionListWindow,1,1060,16044,4204,4059
+VRXWindow: __VREToolsWindow,1,1072,14309,5469,1669
+VRXWindow: __VREWindListWindow,1,5288,16044,3505,4059
 UserFile: 1
 UserWindow: WN_MAIN,1

trunk/gui/printer/manager/PRINTOOL.VRX

@@ -911 +911 @@
 LoadSettings: PROCEDURE EXPOSE globals.
 
-    globals.!version = '0.81'
+    globals.!version = '0.82'
     globals.!copyright = '2013-2018'
 
@@ -1273 +1273 @@
 
     ok = 0
+    _temps.0 = 0
     IF WPToolsFolderContent('<WP_TEMPS>', '_temps.', 'F') THEN
     DO i = 1 TO _temps.0
@@ -1588 +1589 @@
     IF existing THEN DO
         drv_target = TRANSLATE( _pppath )
-        IF drv_source == drv_target ) THEN DO
+        IF drv_source == drv_target THEN DO
             CALL VRMessage VRWindow(), NLSGetMessage( 183 ), NLSGetMessage( 13 ), 'E'
             RETURN 1
@@ -2068 +2069 @@
 RefreshDevices: PROCEDURE EXPOSE globals.
 
+    drivers.0 = 0
     ok = RPUEnumDrivers('drivers.')
     CALL LINEOUT globals.!log1, 'Enumerating drivers:' ok
@@ -2098 +2100 @@
 RefreshPorts: PROCEDURE EXPOSE globals.
 
+    ports.0 = 0
     ok = RPUEnumPorts('ports.')
     CALL LINEOUT globals.!log1, 'Enumerating ports:' ok
@@ -2141 +2144 @@
 */
 RefreshPrinters: PROCEDURE EXPOSE globals.
+
+    printers.0 = 0
     ok = RPUEnumPrinters('printers.')
     CALL LINEOUT globals.!log1, 'Enumerating printers:' ok