fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2009-12-01 01:23 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)

Browse Source 
* contrib/hbwin/wapi_shellapi.c
    ! WAPI_USERISANADMIN() -> WAPI_ISUSERANADMIN()

  * utils/hbmk2/hbmk2.prg
    ! Added RTRIM() to MEMOLINE() calls to strip right space paddings.
This commit is contained in:
Viktor Szakats
2009-12-01 00:24:05 +00:00
parent 449d3de17d
commit 3f19f432ce
3 changed files with 12 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
harbour/ChangeLog
View File

@@ -17,6 +17,13 @@
past entries belonging to author(s): Viktor Szakats.
*/
2009-12-01 01:23 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* contrib/hbwin/wapi_shellapi.c
! WAPI_USERISANADMIN() -> WAPI_ISUSERANADMIN()
* utils/hbmk2/hbmk2.prg
! Added RTRIM() to MEMOLINE() calls to strip right space paddings.
2009-12-01 01:19 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/include/hbwince.h
* harbour/contrib/hbwin/axcore.c

2
harbour/contrib/hbwin/wapi_shellapi.c
View File

@@ -96,7 +96,7 @@ HB_FUNC( WAPI_SHELLEXECUTE )
#endif
}
HB_FUNC( WAPI_USERISANADMIN )
HB_FUNC( WAPI_ISUSERANADMIN )
{
BOOL bResult = FALSE;

8
harbour/utils/hbmk2/hbmk2.prg
View File

@@ -7932,7 +7932,7 @@ STATIC PROCEDURE OutOpt( aOpt )
aOpt[ 2 ] := StrTran( aOpt[ 2 ], "\n", hb_osNewLine() )
nLines := MLCount( aOpt[ 2 ], MaxCol() - 21 )
FOR nLine := 1 TO nLines
IF ! Empty( tmp := MemoLine( aOpt[ 2 ], MaxCol() - 21, nLine ) )
IF ! Empty( tmp := RTrim( MemoLine( aOpt[ 2 ], MaxCol() - 21, nLine ) ) )
IF nLine == 1
OutStd( PadR( Space( 2 ) + aOpt[ 1 ], 21 ) )
ELSE
@@ -7953,7 +7953,7 @@ STATIC PROCEDURE OutNote( cText )
cText := StrTran( cText, "\n", hb_osNewLine() )
nLines := MLCount( cText, MaxCol() - 4 )
FOR nLine := 1 TO nLines
IF ! Empty( tmp := MemoLine( cText, MaxCol() - 4, nLine ) )
IF ! Empty( tmp := RTrim( MemoLine( cText, MaxCol() - 4, nLine ) ) )
IF nLine == 1
OutStd( PadR( " -", 4 ) )
ELSE
@@ -7973,7 +7973,7 @@ STATIC PROCEDURE hbmk_OutStd( cText )
cText := StrTran( cText, "\n", hb_osNewLine() )
nLines := MLCount( cText, MaxCol() - 7 )
FOR nLine := 1 TO nLines
IF ! Empty( tmp := MemoLine( cText, MaxCol() - 7, nLine ) )
IF ! Empty( tmp := RTrim( MemoLine( cText, MaxCol() - 7, nLine ) ) )
IF nLine == 1
OutStd( PadR( "hbmk2:", 7 ) )
ELSE
@@ -7993,7 +7993,7 @@ STATIC PROCEDURE hbmk_OutErr( cText )
cText := StrTran( cText, "\n", hb_osNewLine() )
nLines := MLCount( cText, MaxCol() - 7 )
FOR nLine := 1 TO nLines
IF ! Empty( tmp := MemoLine( cText, MaxCol() - 7, nLine ) )
IF ! Empty( tmp := RTrim( MemoLine( cText, MaxCol() - 7, nLine ) ) )
IF nLine == 1
OutErr( PadR( "hbmk2:", 7 ) )
ELSE