A.D. Fundum
2016-01-10 15:00:11 UTC
FTR: PMDraw/2 v1.97 (IBM EWS, pmdraw_197.zip) doesn't always work,
because there are too many fonts installed. PMDraw/2 claims it can
only examine 307 out of 0 fonts.
A possible fix is to delete enough OS2.INI PM_Fonts entries, and to
restore the deleted INI file entries afterwards. Perhaps even while
PMDraw/2 is running, but I didn't tried that. I also haven't tried to
patch PMDRAW.EXE. You can delete all PM_Fonts entries.
At the moment I'm not going to write a PM_Fonts reducer, for one
because there are several strategies to backup and/or restore deleted
INI file entries and I don't want to hide rather dangerous assumptions
in a README.1ST file. Users may also want to delete different font
entries.
If you're going to query and delete the entries, then make sure that
you record both the name of the key (filename) and the matching value
(full path):
/* QUERY.CMD */
CALL RxFuncAdd 'SysIni','RexxUtil','SysIni'
CALL SysIni 'USER','PM_Fonts','ALL:','font.'
DO i=1 TO font.0
key.i=Sysini('USER','PM_Fonts',font.i)
SAY font.i key.i
END i
SAY 'Number of installed fonts (assumed PMDraw/2 target is <= 307):'
font.0
EXIT
A full uninstall of fonts is not required to rescue PMDraw/2, but
apparently there's such a thing as too many recorded fonts.
--
because there are too many fonts installed. PMDraw/2 claims it can
only examine 307 out of 0 fonts.
A possible fix is to delete enough OS2.INI PM_Fonts entries, and to
restore the deleted INI file entries afterwards. Perhaps even while
PMDraw/2 is running, but I didn't tried that. I also haven't tried to
patch PMDRAW.EXE. You can delete all PM_Fonts entries.
At the moment I'm not going to write a PM_Fonts reducer, for one
because there are several strategies to backup and/or restore deleted
INI file entries and I don't want to hide rather dangerous assumptions
in a README.1ST file. Users may also want to delete different font
entries.
If you're going to query and delete the entries, then make sure that
you record both the name of the key (filename) and the matching value
(full path):
/* QUERY.CMD */
CALL RxFuncAdd 'SysIni','RexxUtil','SysIni'
CALL SysIni 'USER','PM_Fonts','ALL:','font.'
DO i=1 TO font.0
key.i=Sysini('USER','PM_Fonts',font.i)
SAY font.i key.i
END i
SAY 'Number of installed fonts (assumed PMDraw/2 target is <= 307):'
font.0
EXIT
A full uninstall of fonts is not required to rescue PMDraw/2, but
apparently there's such a thing as too many recorded fonts.
--