From bd8706d429b9bc9d330b8be4f9a0d1c0bcbb7ed2 Mon Sep 17 00:00:00 2001
From: dmitry <dmitry@lazarus-ide.org>
Date: Sun, 20 Jan 2019 21:27:17 +0000
Subject: [PATCH] cocoa: updates in drawing a single length lines to half of a
 pixel (for non retina displays) #34681

git-svn-id: trunk@60124 -
---
 lcl/interfaces/cocoa/cocoagdiobjects.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lcl/interfaces/cocoa/cocoagdiobjects.pas b/lcl/interfaces/cocoa/cocoagdiobjects.pas
index 4239f49d98..c9e3339c5c 100644
--- a/lcl/interfaces/cocoa/cocoagdiobjects.pas
+++ b/lcl/interfaces/cocoa/cocoagdiobjects.pas
@@ -1764,8 +1764,8 @@ begin
   if (absDeltaX<=1) and (absDeltaY<=1) then
   begin
     // special case for 1-pixel lines
-    tx := bx + 0.05 * deltaX;
-    ty := by + 0.05 * deltay;
+    tx := bx + 0.5 * deltaX;
+    ty := by + 0.5 * deltay;
   end
   else
   begin