diff options
| author | Kevin Walzer <kw@codebykevin.com> | 2020-11-11 00:08:39 (GMT) |
|---|---|---|
| committer | Kevin Walzer <kw@codebykevin.com> | 2020-11-11 00:08:39 (GMT) |
| commit | 3e45975eb8e68b96df149d258bf416d279f66a1e (patch) | |
| tree | 048c9d02ecc4c0f593112406ebca715c31e4781e /library/systray.tcl | |
| parent | c035b98e2189339b269da7fc27ec024edbbe6830 (diff) | |
| download | tk-3e45975eb8e68b96df149d258bf416d279f66a1e.zip tk-3e45975eb8e68b96df149d258bf416d279f66a1e.tar.gz tk-3e45975eb8e68b96df149d258bf416d279f66a1e.tar.bz2 | |
Attempt to return error on systray command on Windows
Diffstat (limited to 'library/systray.tcl')
| -rw-r--r-- | library/systray.tcl | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/library/systray.tcl b/library/systray.tcl index ca5a8e5..4ec591a 100644 --- a/library/systray.tcl +++ b/library/systray.tcl @@ -339,6 +339,12 @@ proc ::tk::sysnotify {title message} { return } +if {[tk windowingsystem] eq "win32"} { + proc systray {} { + error "invalid command name \"systray\"" + } +} + #Add these commands to the tk command ensemble: tk systray, tk sysnotify #Thanks to Christian Gollwitzer for the guidance here set map [namespace ensemble configure tk -map] |