diff --git a/harbour/ChangeLog b/harbour/ChangeLog index bf341f140e..4be5e16434 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,11 @@ The license applies to all entries newer than 2009-04-28. */ +2012-09-22 08:58 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com) + * contrib/hbide/main.prg + ! Fixed: regression - IdeDBU was not showing up auto when + HbIDE was invoked in DBU mode, reported by Massimo, thanks. + 2012-09-22 12:23 UTC+0200 Viktor Szakats (harbour syenar.net) * website/index.html ! synced with today's filename lowercasing effort diff --git a/harbour/contrib/hbide/main.prg b/harbour/contrib/hbide/main.prg index 238f9dc918..6f49bb847e 100644 --- a/harbour/contrib/hbide/main.prg +++ b/harbour/contrib/hbide/main.prg @@ -756,6 +756,7 @@ METHOD HbIde:create( aParams ) IF ! empty( ::aDbfOnCmdLine ) /* Will take priority and allot more width to browser than editor : logical */ ::oBM:open( ::aDbfOnCmdLine ) + ::oParts:setStack( IDE_PART_DBU ) ENDIF ::qTabWidget:setCurrentIndex( -1 ) @@ -1011,13 +1012,13 @@ METHOD HbIde:execAction( cKey ) ::oHelpDock:show() EXIT CASE "EDITOR" - ::oParts:setStack( 0 ) + ::oParts:setStack( IDE_PART_EDITOR ) EXIT CASE "DBU" - ::oParts:setStack( 1 ) + ::oParts:setStack( IDE_PART_DBU ) EXIT CASE "REPORTS" - ::oParts:setStack( 2 ) + ::oParts:setStack( IDE_PART_REPORTSDESIGNER ) EXIT ENDSWITCH