From 30bce52ec95ce9d993e849faef3a719632a0845b Mon Sep 17 00:00:00 2001
From: fvogel <fvogelnew1@free.fr>
Date: Wed, 11 Nov 2020 14:45:22 +0000
Subject: Refine error message

---
 library/systray.tcl | 2 +-
 tests/systray.test  | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/library/systray.tcl b/library/systray.tcl
index ab07d22..8f433cb 100644
--- a/library/systray.tcl
+++ b/library/systray.tcl
@@ -304,7 +304,7 @@ proc ::tk::sysnotify {title message} {
     switch -- [tk windowingsystem] {
 	"win32" {
 	    if {$::winicoprops::ico eq ""} {
-		error "Must create a system tray icon with the \"tk systray\" command"
+		error "Must create a system tray icon with the \"tk systray\" command first"
 	    }
 	    _sysnotify notify $::winicoprops::ico $title $message
 	}
diff --git a/tests/systray.test b/tests/systray.test
index f12fa08..e64ec07 100644
--- a/tests/systray.test
+++ b/tests/systray.test
@@ -57,7 +57,7 @@ test sysnotify-2.1 {system notification stems from a systray icon on Windows} -c
     tk systray destroy
 } -body {
     tk sysnotify {Alert} {This is an alert}
-} -returnCodes {error} -result {Must create a system tray icon with the "tk systray" command}
+} -returnCodes {error} -result {Must create a system tray icon with the "tk systray" command first}
 test sysnotify-2.2 {system notification is not linked to any systray icon on X11 or aqua} -constraints {
     nonwin
 } -body {
-- 
cgit v0.12