From 1a0133d9d21b15e88a7c5641b9d78bfb0137baab Mon Sep 17 00:00:00 2001
From: maxim <maxim@lazarus-ide.org>
Date: Tue, 26 May 2015 22:36:51 +0000
Subject: [PATCH] Merged revision(s) 49172 #b8503e1976 from trunk: Menueditor:
 Fix error when moving menu items. Issue #27849, patch from Michl. ........

git-svn-id: branches/fixes_1_4@49186 -
---
 designer/designermenu.pp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/designer/designermenu.pp b/designer/designermenu.pp
index 00bbbc8ac0..5abb2aaafc 100644
--- a/designer/designermenu.pp
+++ b/designer/designermenu.pp
@@ -1991,6 +1991,8 @@ begin
       DMenuItem.NextItem:=TempMI;
       if (DMenuItem.ParentMenu <> nil) then
         DMenuItem.ParentMenu.SubMenu:=DMenuItem;
+      if (TempMI.NextItem <> nil) then
+        TempMI.NextItem.PrevItem:=TempMI;
       if (DMenuItem.PrevItem <> nil) then
         DMenuItem.PrevItem.NextItem:=DMenuItem;
       Result:=1;