[Synedit-checkins] SynEdit/Source SynEdit.pas, 1.457.2.15, 1.457.2.16

[Flávio E. <et...@us...>]

Update of /cvsroot/synedit/SynEdit/Source
In directory sc8-pr-cvs8.sourceforge.net:/tmp/cvs-serv32034

Modified Files:
      Tag: SynEdit_2_0_x
	SynEdit.pas 
Log Message:
Somewhat silly optimization: avoid unecessary canvas invalidation in SetTopLine.

Index: SynEdit.pas
===================================================================
RCS file: /cvsroot/synedit/SynEdit/Source/SynEdit.pas,v
retrieving revision 1.457.2.15
retrieving revision 1.457.2.16
diff -u -d -r1.457.2.15 -r1.457.2.16
--- SynEdit.pas	13 Feb 2008 04:29:11 -0000	1.457.2.15
+++ SynEdit.pas	5 Jun 2008 23:12:32 -0000	1.457.2.16
@@ -4409,6 +4409,7 @@
       ScrollWindow(Handle, 0, fTextHeight * Delta, nil, nil);
 {$ENDIF}
       OffsetRect(fInvalidateRect, 0, fTextHeight * Delta);
+      IntersectRect(fInvalidateRect, fInvalidateRect, ClientRect);
     end
     else
       Invalidate;