From 82200be36259a0805a04919d21e3071aae4a1664 Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Sat, 17 Apr 2010 19:36:55 +0000
Subject: [PATCH] SynEdit: Fixed ChangeStamp, broken in rev 24476 #02c12b2e82

git-svn-id: trunk@24684 -
---
 components/synedit/synedittextbuffer.pp | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/components/synedit/synedittextbuffer.pp b/components/synedit/synedittextbuffer.pp
index 7d24a751eb..4261033401 100644
--- a/components/synedit/synedittextbuffer.pp
+++ b/components/synedit/synedittextbuffer.pp
@@ -534,6 +534,7 @@ begin
     ListIndexOutOfBounds(Index);
   BeginUpdate;
   FList.DeleteRows(Index, 1);
+  IncreaseTextChangeStamp;
   fIndexOfLongestLine := -1;
   SendNotification(senrLineCount, self, Index, -1);
   EndUpdate;
@@ -547,6 +548,7 @@ begin
       ListIndexOutOfBounds(Index);
     BeginUpdate;
     FList.DeleteRows(Index, NumLines);
+    IncreaseTextChangeStamp;
     SendNotification(senrLineCount, self, Index, -NumLines);
     EndUpdate;
   end;
@@ -758,6 +760,7 @@ begin
   if Count = Capacity then
     Grow;
   FList.InsertRows(Index, 1);
+  IncreaseTextChangeStamp;
   fIndexOfLongestLine := -1;                                                    //mh 2000-10-19
   fList[Index] := S;
   FList.Objects[Index] := nil;
@@ -777,6 +780,7 @@ begin
       if Capacity<Count + NumLines then
         SetCapacity(Count + NumLines);
       FList.InsertRows(Index, NumLines);
+      IncreaseTextChangeStamp;
       SendNotification(senrLineCount, self, Index, NumLines);
     finally
       EndUpdate;