Hi,
>From comp.lang.xharbour news:
>>If I try to execute
>>? oemtohtml("&")
>>the program hangs
Please someone can test and comfirm my fix on this:
At line 4373 from source\tip\thtml.prg file:
DO WHILE .NOT. ( (cChr := P_NEXT(parser)) $ "; " ) .AND. .NOT. parser:p_pos ==
0; ENDDO
SWITCH cChr
== REPLACE BY ==
DO WHILE .NOT. ( (cChr := P_NEXT(parser)) $ "; " ) .AND. Asc(cChr) > 0 .AND.
.NOT. parser:p_pos == 0; ENDDO
if Asc(cChr) == 0
LOOP
endif
SWITCH cChr
====
regards,
Eduardo
____________________________________________________________________________________
Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com
------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
trial. Simplify your report design, integration and deployment - and focus on
what you do best, core application coding. Discover what's new with
Crystal Reports now. http://p.sf.net/sfu/bobj-july
_______________________________________________
xHarbour-developers mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/xharbour-developers
