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

2012-10-12 16:31 UTC+0200 Viktor Szakats (harbour syenar.net)

Browse Source 
* contrib/xhb/xhbtedit.prg
    * formatting
This commit is contained in:
Viktor Szakats
2012-10-12 14:31:30 +00:00
parent 9d61b5ceae
commit 6a427361f1
2 changed files with 16 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -16,6 +16,10 @@
The license applies to all entries newer than 2009-04-28.
*/
2012-10-12 16:31 UTC+0200 Viktor Szakats (harbour syenar.net)
* contrib/xhb/xhbtedit.prg
* formatting
2012-10-12 16:27 UTC+0200 Viktor Szakats (harbour syenar.net)
* contrib/hbnf/menu1.prg
* contrib/hbnf/popadder.prg

24
harbour/contrib/xhb/xhbtedit.prg
View File

@@ -260,18 +260,18 @@ ENDCLASS
METHOD New( cString, nTop, nLeft, nBottom, nRight, lEditMode, nLineLength, nTabSize, nTextRow, nTextCol, nWndRow, nWndCol ) CLASS XHBEditor
__defaultNIL( @ cString, "" )
__defaultNIL( @ nTop, 0 )
__defaultNIL( @ nLeft, 0 )
__defaultNIL( @ nBottom, MaxRow() )
__defaultNIL( @ nRight, MaxCol() )
__defaultNIL( @ lEditMode, .T. )
__defaultNIL( @ nLineLength, NIL )
__defaultNIL( @ nTabSize, NIL )
__defaultNIL( @ nTextRow, 1 )
__defaultNIL( @ nTextCol, 0 )
__defaultNIL( @ nWndRow, 0 )
__defaultNIL( @ nWndCol, 0 )
__defaultNIL( @cString, "" )
__defaultNIL( @nTop, 0 )
__defaultNIL( @nLeft, 0 )
__defaultNIL( @nBottom, MaxRow() )
__defaultNIL( @nRight, MaxCol() )
__defaultNIL( @lEditMode, .T. )
__defaultNIL( @nLineLength, NIL )
__defaultNIL( @nTabSize, NIL )
__defaultNIL( @nTextRow, 1 )
__defaultNIL( @nTextCol, 0 )
__defaultNIL( @nWndRow, 0 )
__defaultNIL( @nWndCol, 0 )
// 2006/JUL/22 - E.F. To avoid run time error.
IF nTop > nBottom .OR. nLeft > nRight