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
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers

Reply via email to