From 0c4d7c80098d5f0c7602fc8f8d23bef2e986b5c3 Mon Sep 17 00:00:00 2001
From: zeljko <zeljko@lazarus-ide.org>
Date: Sun, 11 Mar 2012 13:53:25 +0000
Subject: [PATCH] Carbon: set SM_CYMENU in GetSystemMetrics as 0, so we don't
 return DebugLn TODO in that case. Under mac menu isn't part of form, so 0.

git-svn-id: trunk@35885 -
---
 lcl/interfaces/carbon/carbonwinapi.inc | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lcl/interfaces/carbon/carbonwinapi.inc b/lcl/interfaces/carbon/carbonwinapi.inc
index d3d7b98712..3d4d925908 100644
--- a/lcl/interfaces/carbon/carbonwinapi.inc
+++ b/lcl/interfaces/carbon/carbonwinapi.inc
@@ -2037,6 +2037,7 @@ begin
         Result := GetCarbonThemeMetric(kThemeMetricTitleBarControlsHeight);
         Result := Result + (Result div 2) + 1;
       end;
+    SM_CYMENU: Result := 0;
   else
     DebugLn('TCarbonWidgetSet.GetSystemMetrics TODO ', DbgS(NIndex));;
   end;