diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 1b1f3b9803..2a40a60857 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,12 @@ 2002-12-01 13:30 UTC+0100 Foo Bar */ +2007-04-02 19:25 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) + * harbour/contrib/ole/oleauto.prg + * removed unused local variable + * harbour/source/rtl/net.c + ! fixed typo in variable name + 2007-04-02 19:00 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/source/rtl/hbregex.c + added HB_REGEXHAS() and HB_REGEXLIKE() diff --git a/harbour/contrib/ole/oleauto.prg b/harbour/contrib/ole/oleauto.prg index 92015a8978..5cae87ae5f 100644 --- a/harbour/contrib/ole/oleauto.prg +++ b/harbour/contrib/ole/oleauto.prg @@ -139,8 +139,6 @@ RETURN uObj METHOD Set( cProperty, uParam1, uParam2, uParam3, uParam4, uParam5, uParam6 ) CLASS TOleAuto - LOCAL uObj - IF uParam6 != NIL OLESetProperty( ::hObj, cProperty, uParam1, uParam2, uParam3, uParam4, uParam5, uParam6 ) ELSEIF uParam5 != NIL diff --git a/harbour/source/rtl/net.c b/harbour/source/rtl/net.c index e007e83260..f71cc02825 100644 --- a/harbour/source/rtl/net.c +++ b/harbour/source/rtl/net.c @@ -172,7 +172,7 @@ HB_FUNC( NETNAME ) szValue[ 0 ] = '\0'; if( fGetUser ) - GetUserName( pszValue, &ulLen ); + GetUserName( szValue, &ulLen ); else GetComputerName( szValue, &ulLen );