From fb60fef065affa9878fc3abbaa474589af14009e Mon Sep 17 00:00:00 2001
From: maxim <maxim@lazarus-ide.org>
Date: Fri, 15 Jul 2016 21:51:21 +0000
Subject: [PATCH] IDE: do not emit translatable strings for divider menuitems
 (with caption='-'), patch by Nur Cholif Murtadho, bug #26553

git-svn-id: trunk@52695 -
---
 ide/sourcefilemanager.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/ide/sourcefilemanager.pas b/ide/sourcefilemanager.pas
index f5e3930152..e5dc84af09 100644
--- a/ide/sourcefilemanager.pas
+++ b/ide/sourcefilemanager.pas
@@ -4930,6 +4930,7 @@ begin
   if not Assigned(Instance) then exit;
   if not Assigned(PropInfo) then exit;
   if SysUtils.CompareText(PropInfo^.PropType^.Name,'TTRANSLATESTRING')<>0 then exit;
+  if (SysUtils.CompareText(Instance.ClassName,'TMENUITEM')=0) and (Content='-') then exit;
   if Writer.Driver is TLRSObjectWriter then begin
     LRSWriter:=TLRSObjectWriter(Writer.Driver);
     Path:=LRSWriter.GetStackPath;