diff --git a/harbour/ChangeLog b/harbour/ChangeLog index cb37449c25..4628361842 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -17,6 +17,10 @@ past entries belonging to author(s): Viktor Szakats. */ +2009-11-24 13:20 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl) + * harbour/src/rtl/cdpapi.c + ! fixed bad typo in hb_cdpTranslateChar() function + 2009-11-24 12:07 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) * contrib/hbwin/hbwin.ch * contrib/hbwin/win_prn2.c diff --git a/harbour/src/rtl/cdpapi.c b/harbour/src/rtl/cdpapi.c index 49efb09de7..18cb8363ff 100644 --- a/harbour/src/rtl/cdpapi.c +++ b/harbour/src/rtl/cdpapi.c @@ -1543,7 +1543,7 @@ int hb_cdpTranslateChar( int iChar, BOOL fCtrl, PHB_CODEPAGE cdpIn, PHB_CODEPAGE hb_cdpBuildTransTable( cdpOut->uniTable ); wc = cdpIn->uniTable->uniCodes[ iChar ]; - if( wc && wc <= cdpIn->uniTable->wcMax && + if( wc && wc <= cdpOut->uniTable->wcMax && cdpOut->uniTable->uniTrans[ wc ] ) iChar = cdpOut->uniTable->uniTrans[ wc ]; }