Hi Vlad,
Would you mind posting a patch for this file? I'll commit it.

I'm not an ACHOICE() user, so it's difficult for me to test
this properly for Clipper compatibility.

Brgds,
Viktor

On Wed, Mar 11, 2009 at 8:44 AM, Vladislav Lavrecky <[email protected]> wrote:

> [email protected] wrote:
>
>> Revision: 10582
>>
>> http://harbour-project.svn.sourceforge.net/harbour-project/?rev=10582&view=rev
>> Author:   vszakats
>> Date:     2009-03-10 17:43:39 +0000 (Tue, 10 Mar 2009)
>>
>> Log Message:
>> -----------
>> (sorry I've missed adding the entry to ChangeLog in prev commit)
>>
>> 2009-03-10 18:18 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
>>  * ChangeLog
>>   * Updates.
>>
>>  * contrib/xhb/txml.prg
>>   * Update HB_REGEXMATCH() calls, to keep old logic.
>>   ; TOFIX: Above doesn't mean it's now correct, so
>>            someone familiar with this code, please
>>            correct it.
>>
>>  * contrib/hbapollo/apollo.c
>>   * Removed essentially empty comments.
>>
>>  * source/rtl/achoice.prg
>>   ! Applied fix from Vladislav Lavrecky.
>>     I didn't test it just assumed okay, please do so.
>>
>>
> achoice with additional redraw on exit are ok
> I test it previously, but in my message just an example
> To fix achoice we need to add
> +   DispPage( acItems, alSelect, nTop, nLeft, nRight, nNumRows, 0, nAtTop,
> nItems, bSelect, nRowsClr )
> in all CASE items where lFinished := .T.
> or IMO better
> add one redraw line before exit from achoice function
> [...]
>  ENDDO
> +   DispPage( acItems, alSelect, nTop, nLeft, nRight, nNumRows, 0, nAtTop,
> nItems, bSelect, nRowsClr )
>  SetCursor( nSaveCsr )
>
>  RETURN nPos
> [...]
>
> Brgds,
> Vlad
>
>  Modified Paths:
>> --------------
>>    trunk/harbour/ChangeLog
>>
>>
>> This was sent by the SourceForge.net collaborative development platform,
>> the world's largest Open Source development site.
>> _______________________________________________
>> Harbour mailing list
>> [email protected]
>> http://lists.harbour-project.org/mailman/listinfo/harbour
>>
>>
>>
>
> _______________________________________________
> Harbour mailing list
> [email protected]
> http://lists.harbour-project.org/mailman/listinfo/harbour
>
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to