diff --git a/harbour/ChangeLog b/harbour/ChangeLog index e8c92f97d6..f5b982a9e5 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,13 @@ The license applies to all entries newer than 2009-04-28. */ +2012-09-20 00:17 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com) + * contrib/gtwvg/crt.prg + ! Fixed: regression caused by redirection of "?" command. + Changed: ? " " => CLS + This fixes nasty behavior of WvgCRT() not showing up altogether. + Took roughly four hours to debug. + 2012-09-19 18:46 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com) * contrib/hbide/main.prg * contrib/hbxbp/dbu.prg diff --git a/harbour/contrib/gtwvg/crt.prg b/harbour/contrib/gtwvg/crt.prg index 8e83a8fe9c..5b48d1d53b 100644 --- a/harbour/contrib/gtwvg/crt.prg +++ b/harbour/contrib/gtwvg/crt.prg @@ -342,7 +342,7 @@ METHOD WvgCrt:create( oParent, oOwner, aPos, aSize, aPresParams, lVisible ) ENDIF /* CreateWindow() be forced to execute */ - ? " " + CLS ::hWnd := hb_gtInfo( HB_GTI_SPEC, HB_GTS_WINDOWHANDLE ) ::setFocus()