From 929866a770f6a096239196dc022e16348a91d136 Mon Sep 17 00:00:00 2001 From: Dianne Skoll Date: Mon, 27 Feb 2023 12:13:19 -0500 Subject: [PATCH] Use ^A as the split character rather than \ --- scripts/tkremind | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/scripts/tkremind b/scripts/tkremind index 5470db8a..5c412ffb 100755 --- a/scripts/tkremind +++ b/scripts/tkremind @@ -3635,9 +3635,9 @@ proc DoShadeSpecial { n r g b } { #*********************************************************************** proc DoMoonSpecial { n stuff fntag day } { set msg "" - # Yes, this is gross, but the odds of "\" appearing + # Yes, this is gross, but the odds of ctrl-A appearing # in the text associated with a MOON are small. - set num [scan $stuff {%d %d %d %[^\]} phase junk1 junk2 msg] + set num [scan $stuff {%d %d %d %[^]} phase junk1 junk2 msg] if {$num < 1} { return }