[Date Prev][Date Next][Subject Prev][Subject Next][ Date Index][ Subject Index]

Re: XPL Program Glitch (p.s.) - Correction



Nathan:

No sooner did I send ITAL2.PM than I realized that
it's wrong in one important respect: a single MD +IT
command to italicize a DeFined block will NOT work in
EXPanded view! So you were absolutely right to take the
Display Type into account and to place «MD+IT» and
«MD-IT» statements individually at the beginning and end
of a DF block. However, to restore the original display,
I would simply use func TG (which toggles eXPanded view
on|off) if the current display type is non-eXPanded,
bearing in mind that when eXPanded view is present, the
VAlue of $DT can be either 0 or 8, depending on whether
the file was *opened* in eXPanded view or whether
eXPanded view was *toggled* (func TG) from another
display type. So, in pseudo-code, you'd have:

«SU01,»«IF«VA$DT»(»)0&«VA$DT»(<>)8>TG «SU01,TG »«EI»;*;
DZ «IF«VA$DE»(»)0>DB «MD+IT»DE «MD-IT»«GT01»;*;
YD «EX»«EI»«MD+IT»«MD-IT»BX seb  [w<]Q2 «EX»

Working code attached as ITAL2NEW.PM.

Apologies for the error.

--
Carl Distefano
cld@xxxxxxxx
http://users.datarealm.com/xywwweb/


Attachment: ital2new.pm Description: Binary data