2012-09-22 11:28 UTC+0200 Viktor Szakats (harbour syenar.net)

+ contrib/hbide/xbpaddons/dbstruct.ui
  + contrib/hbide/xbpaddons/fetchdate.ui
  + contrib/hbide/xbpaddons/tables.ui
  - contrib/hbide/xbpaddons/xbpdbstruct.ui
  - contrib/hbide/xbpaddons/xbpfetchdate.ui
  - contrib/hbide/xbpaddons/xbptables.ui
    ! redone the naming scheme introduced few month ago
      and added to this new component yesterday, which 
      was since undone by Pritpal.

  * contrib/hbide/xbpaddons/xbpaddons.hbp
  * contrib/hbide/hbide.hbp
    ! deleted wrongly added -L option by Pritpal
      .hbc should take care of it.

  * utils/hbmk2/hbmk2.prg
    ! hbshell_gtInteractive() will now create new GT only when necessary
    + internal changes to support multiple initial commands
This commit is contained in:
Viktor Szakats
2012-09-22 09:29:22 +00:00
parent 6c3ccdc8b0
commit 1f2722584b
7 changed files with 43 additions and 13 deletions

View File

@@ -16,6 +16,26 @@
The license applies to all entries newer than 2009-04-28.
*/
2012-09-22 11:28 UTC+0200 Viktor Szakats (harbour syenar.net)
+ contrib/hbide/xbpaddons/dbstruct.ui
+ contrib/hbide/xbpaddons/fetchdate.ui
+ contrib/hbide/xbpaddons/tables.ui
- contrib/hbide/xbpaddons/xbpdbstruct.ui
- contrib/hbide/xbpaddons/xbpfetchdate.ui
- contrib/hbide/xbpaddons/xbptables.ui
! redone the naming scheme introduced few month ago
and added to this new component yesterday, which
was since undone by Pritpal.
* contrib/hbide/xbpaddons/xbpaddons.hbp
* contrib/hbide/hbide.hbp
! deleted wrongly added -L option by Pritpal
.hbc should take care of it.
* utils/hbmk2/hbmk2.prg
! hbshell_gtInteractive() will now create new GT only when necessary
+ internal changes to support multiple initial commands
2012-09-21 19:41 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/hbide/hbide.hbp
- contrib/hbide/hbqreportsmanager.prg
@@ -30,14 +50,14 @@
- contrib/hbide/tables.ui
* contrib/hbide/hbide.hbp
* contrib/hbide/misc.prg
- Deleted: two more resources which have already been moved to
- Deleted: two more resources which have already been moved to
xbpaddons library.
2012-09-21 18:07 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
- contrib/hbide/idedbu/*
+ contrib/hbide/xbpaddons/*
- Deleted xbpaddons consumed resources from hbide/resources.
2012-09-21 12:04 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/hbide/hbide.hbp
* contrib/hbxbp/hbxbp.hbp

View File

@@ -25,7 +25,6 @@ hbformat.hbc
xbpaddons/xbpaddons.hbp
xbpaddons/xbpaddons.hbc
-Lxbpaddons
-env:HB_DYNLOAD_RDDADS=yes
rddads.hbc

View File

@@ -16,6 +16,6 @@ reports.prg
xbp.qrc
xbpdbstruct.ui
xbpfetchdate.ui
xbptables.ui
dbstruct.ui
fetchdate.ui
tables.ui

View File

@@ -569,6 +569,7 @@ STATIC s_nCol := 0
STATIC s_aHistory := {}
STATIC s_lPreserveHistory := .T.
STATIC s_lWasLoad := .F.
STATIC s_lInteractive := .T.
PROCEDURE _APPMAIN( ... )
LOCAL aArgsProc
@@ -12328,6 +12329,8 @@ STATIC PROCEDURE __hbshell( cFile, ... )
SWITCH cExt
CASE ".hb"
s_lInteractive := .F.
/* NOTE: Assumptions:
- one dynamic lib belongs to one .hbc file (true for dynamic builds in contrib)
- dynamic libs will reference and automatically load all their dependencies
@@ -12370,13 +12373,14 @@ STATIC PROCEDURE __hbshell( cFile, ... )
ENDIF
CASE ".hrb"
s_lInteractive := .F.
__hbshell_ext_init( aExtension )
hb_argShift( .T. )
hb_hrbRun( cFile, ... )
EXIT
CASE ".dbf"
__hbshell_ext_init( aExtension )
__hbshell_prompt( hb_AParams(), "USE " + cFile + " SHARED" )
__hbshell_prompt( hb_AParams(), { "USE " + cFile + " SHARED" } )
EXIT
ENDSWITCH
ELSE
@@ -12757,7 +12761,7 @@ STATIC PROCEDURE __hbshell_plugins_unload( plugins )
#include "setcurs.ch"
/* TODO: rewrite the full-screen shell to be a simple stdout/stdin shell */
STATIC PROCEDURE __hbshell_prompt( aParams, cCommand )
STATIC PROCEDURE __hbshell_prompt( aParams, aCommand )
LOCAL GetList
LOCAL cLine
LOCAL nMaxRow, nMaxCol
@@ -12765,6 +12769,7 @@ STATIC PROCEDURE __hbshell_prompt( aParams, cCommand )
LOCAL bKeyUP, bKeyDown, bKeyIns, bKeyResize
LOCAL lResize := .F.
LOCAL plugins
LOCAL cCommand
LOCAL cDomain := ""
LOCAL cPrompt
@@ -12798,10 +12803,14 @@ STATIC PROCEDURE __hbshell_prompt( aParams, cCommand )
__hbshell_Exec( "?? hb_Version()" )
IF HB_ISSTRING( cCommand )
AAdd( s_aHistory, PadR( cCommand, HB_LINE_LEN ) )
__hbshell_Info( cCommand )
__hbshell_Exec( cCommand )
IF HB_ISARRAY( aCommand )
FOR EACH cCommand IN aCommand
IF HB_ISSTRING( cCommand )
AAdd( s_aHistory, PadR( cCommand, HB_LINE_LEN ) )
__hbshell_Info( cCommand )
__hbshell_Exec( cCommand )
ENDIF
NEXT
ELSE
cCommand := ""
ENDIF
@@ -13150,7 +13159,9 @@ FUNCTION hbshell_ProgName()
RETURN s_cProgName_hbshell
FUNCTION hbshell_gtInteractive()
hb_gtSelect( hb_gtCreate( __hbshell_gtDefault() ) )
IF !( "GT" + hb_gtVersion( 0 ) == __hbshell_gtDefault() )
hb_gtSelect( hb_gtCreate( __hbshell_gtDefault() ) )
ENDIF
RETURN NIL
STATIC FUNCTION __hbshell_gtDefault()