We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 5c34aaa commit c113bc5Copy full SHA for c113bc5
1 file changed
library/demos/widget
@@ -19,12 +19,11 @@ set tk_demoDirectory [file join [pwd] [file dirname [info script]]]
19
namespace import ::msgcat::mc
20
21
# Divert to the accessible widget demo if screen reader is on.
22
-if {[info commands ::tk::accessible::check_screenreader] ne ""} {
23
- if {[::tk::accessible::check_screenreader] eq "1"} {
24
- source -encoding utf-8 [file join $tk_demoDirectory accessiblewidget]
25
- }
+if {[::tk::accessible::check_screenreader] eq "1"} {
+ source -encoding utf-8 [file join $tk_demoDirectory accessiblewidget]
26
}
27
+
28
wm title . [mc "Widget Demonstration"]
29
if {[tk windowingsystem] eq "x11"} {
30
# This won't work everywhere, but there's no other way in core Tk at the
0 commit comments