From c1a12ea4e9656115305be6c214c15c7987683fba Mon Sep 17 00:00:00 2001
From: Dianne Skoll <dianne@skoll.ca>
Date: Sat, 25 Dec 2021 18:27:56 -0500
Subject: [PATCH] Don't outline the arcs used to make first/last quarter.

---
 scripts/tkremind | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/scripts/tkremind b/scripts/tkremind
index 5e2df3ac..7aaac566 100755
--- a/scripts/tkremind
+++ b/scripts/tkremind
@@ -3512,14 +3512,14 @@ proc CreateMoonWindows {} {
 
     canvas .moon_first -background $Option(BackgroundColor) -width $wid -height $wid -borderwidth 0 -highlightthickness 0
     .moon_first create oval $extra $extra $w $w -outline $Option(TextColor) -width 1
-    .moon_first create arc $extra $extra $w $w -outline $Option(TextColor) -fill $Option(TextColor) -start 90 -extent 180
+    .moon_first create arc $extra $extra $w $w -outline $Option(TextColor) -fill $Option(TextColor) -start 90 -extent 180 -outline {}
 
     canvas .moon_full -background $Option(BackgroundColor) -width $wid -height $wid -borderwidth 0 -highlightthickness 0
     .moon_full create oval $extra $extra $w $w -outline $Option(TextColor) -fill $Option(TextColor) -width 1
 
     canvas .moon_last -background $Option(BackgroundColor) -width $wid -height $wid -borderwidth 0 -highlightthickness 0
     .moon_last create oval $extra $extra $w $w -outline $Option(TextColor) -width 1
-    .moon_last create arc $extra $extra $w $w -outline $Option(TextColor) -fill $Option(TextColor) -start 270 -extent 180
+    .moon_last create arc $extra $extra $w $w -outline $Option(TextColor) -fill $Option(TextColor) -start 270 -extent 180 -outline {}
 }
 
 #***********************************************************************