From 7b11f22871341dceb7e6eed554140a028cb8830e Mon Sep 17 00:00:00 2001
From: freq <freq@lazarus-ide.org>
Date: Sat, 8 Feb 2014 18:17:20 +0000
Subject: [PATCH] Cocoa: Fix not working framerect call

git-svn-id: trunk@43958 -
---
 lcl/interfaces/cocoa/cocoagdiobjects.pas | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

diff --git a/lcl/interfaces/cocoa/cocoagdiobjects.pas b/lcl/interfaces/cocoa/cocoagdiobjects.pas
index 34c7bfdbd6..d4d00e6bb6 100644
--- a/lcl/interfaces/cocoa/cocoagdiobjects.pas
+++ b/lcl/interfaces/cocoa/cocoagdiobjects.pas
@@ -1769,13 +1769,7 @@ end;
 
 procedure TCocoaContext.FrameRect(const ARect: TRect; const ABrush: TCocoaBrush);
 begin
-  if ABrush <> Brush then
-    ABrush.Apply(Self);
-  if not ctx.currentContextDrawingToScreen then
-    ctx.setCurrentContext(ctx);
-  NSFrameRect(RectToNSRect(ARect));
-  if ABrush <> Brush then
-    Brush.Apply(Self);
+ Rectangle(Arect.Left,ARect.Top,Arect.Right,ARect.Bottom, False, ABrush);
 end;
 
 procedure TCocoaContext.SetCGFillping(Ctx: CGContextRef; Width, Height: CGFloat);