summaryrefslogtreecommitdiffstats
path: root/library/iconbadges.tcl
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2021-09-02 06:29:25 (GMT)
committerfvogel <fvogelnew1@free.fr>2021-09-02 06:29:25 (GMT)
commit33b410445ea31b0d9e665edf7f32a44098ff2df6 (patch)
tree8ddc268b42ffe057de09d9090eced47c6150faa0 /library/iconbadges.tcl
parentff1cfa9dacdf27ec5bc8a0e2c8bac690d99ed9ab (diff)
downloadtk-33b410445ea31b0d9e665edf7f32a44098ff2df6.zip
tk-33b410445ea31b0d9e665edf7f32a44098ff2df6.tar.gz
tk-33b410445ea31b0d9e665edf7f32a44098ff2df6.tar.bz2
Remove useless statements.
Diffstat (limited to 'library/iconbadges.tcl')
-rw-r--r--library/iconbadges.tcl3
1 files changed, 0 insertions, 3 deletions
diff --git a/library/iconbadges.tcl b/library/iconbadges.tcl
index a47175a..74c4262 100644
--- a/library/iconbadges.tcl
+++ b/library/iconbadges.tcl
@@ -228,8 +228,6 @@ if {[tk windowingsystem] eq "x11"} {
image create photo overlay
- update idletasks
-
wm iconphoto $win $::tk::icons::base_icon
switch -glob -- $badgenumber {
@@ -245,7 +243,6 @@ if {[tk windowingsystem] eq "x11"} {
}
- update idletasks
overlay copy $::tk::icons::base_icon
overlay copy $badge -from 0 0 18 18 -to 18 0
wm iconphoto $win overlay