Fix erasing cursor on top of raised boxes in NS port

* src/nsterm.m (ns_draw_relief): Clear top and bottom line areas
first, if required.

1 files changed, 12 insertions, 0 deletions

diff --git a/src/nsterm.m b/src/nsterm.m
index ed0e7a2aae8..8ee5c03b97e 100644
--- a/src/nsterm.m
+++ b/src/nsterm.m
@@ -3510,6 +3510,12 @@ ns_draw_relief (NSRect outer, int hthickness, int vthickness, char raised_p,
 
   [(raised_p ? lightCol : darkCol) set];
 
+  if (top_p)
+    {
+      NSRectFill (NSMakeRect (NSMinX (outer), NSMinY (outer),
+                              NSWidth (outer), hthickness));
+    }
+
   if (top_p || left_p)
     {
       NSBezierPath *p = [NSBezierPath bezierPath];
@@ -3549,6 +3555,12 @@ ns_draw_relief (NSRect outer, int hthickness, int vthickness, char raised_p,
       [p closePath];
       [p fill];
     }
+
+  if (bottom_p)
+    {
+      NSRectFill (NSMakeRect (NSMinX (outer), NSMaxY (inner),
+                              NSWidth (outer), hthickness));
+    }
 }