Changeset 74 for trunk/gui/shared/PrManUtl.VRS

Timestamp:

Jan 3, 2019, 9:04:33 PM (7 years ago)

Author:

Alex Taylor

Message:

Fix parsing problem in certain PPDs causing potential abend

File:

• trunk/gui/shared/PrManUtl.VRS (modified) (2 diffs)

trunk/gui/shared/PrManUtl.VRS

@@ -649 +649 @@
             line = STRIP( LINEIN( ppd_file ))
             IF LEFT( line, 15 ) == '*ShortNickName:' THEN DO
-            PARSE VAR line . ':' _nick '0D'x .
+                PARSE VAR line . ':' _nick '0D'x .
                 nickname = STRIP( _nick )
+                nickname = STRIP( nickname, 'B', '09'x )
                 nickname = STRIP( nickname, 'B', '"')
+                nickname = TRANSLATE( nickname, ' ', '"')
+                nickname = TRANSLATE( nickname, ' ', "'")
                 LEAVE
             END
@@ -928 +931 @@
          * to our working directory.
          */
-        CALL LINEOUT globals.!log1, 'Converting PPD with:' ppd_exe ppdfile ppd_use
-        ADDRESS CMD '@'ppd_exe ppdfile ppd_use '2>NUL | RXQUEUE' nq
+        CALL LINEOUT globals.!log1, 'Converting PPD with:' ppd_exe '"'ppdfile'" "'ppd_use'"'
+        ADDRESS CMD '@'ppd_exe '"'ppdfile'" "'ppd_use'" 2>NUL | RXQUEUE' nq
         DO QUEUED()
             PULL output