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

2012-08-26 17:46 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)

Browse Source 
* contrib/hbide/edit.prg
    * Fixed: a small glich in building the aligned line.
This commit is contained in:
Pritpal Bedi
2012-08-27 00:47:36 +00:00
parent f148efd20f
commit bb57f9070a
2 changed files with 7 additions and 3 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-08-26 17:46 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/hbide/edit.prg
* Fixed: a small glich in building the aligned line.
2012-08-26 16:32 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/hbide/docks.prg
* contrib/hbide/edit.prg

6
harbour/contrib/hbide/edit.prg
View File

@@ -1312,9 +1312,9 @@ METHOD IdeEdit:alignAt( cAt )
nMax += nL - 2
FOR i := nT TO nB
cLine := ::getLine( i + 1 )
IF ( n := At( cAt, cLine ) ) > 0
c1st := SubStr( cLine, 1, n - 1 )
c2nd := SubStr( cLine, n )
IF ( n := At( cAt, SubStr( cLine, nL, nR - nL + 1 ) ) ) > 0
c1st := SubStr( cLine, 1, nL + n - 2 )
c2nd := SubStr( cLine, nL + n - 1 )
cLine := PadR( c1st, nMax ) + c2nd
ENDIF
hbide_qReplaceLine( qCursor, i, cLine )