Changeset 72 for trunk/gui/printer/manager/PRINTOOL.VRX

Timestamp:

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

Author:

Alex Taylor

Message:

Fix some errors exposed by Object REXX

File:

• trunk/gui/printer/manager/PRINTOOL.VRX (modified) (6 diffs)

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