From 6c0955542e2f1d4339450cbf3987c92cb32b9d2f Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Wed, 3 Jan 2024 12:43:05 +0000 Subject: Don't do a nmake build with OPTS=static (yet). See [1ca3c8d9da] --- .github/workflows/win-build.yml | 1 - 1 file changed, 1 deletion(-) diff --git a/.github/workflows/win-build.yml b/.github/workflows/win-build.yml index 73f9dce..d9a66a1 100644 --- a/.github/workflows/win-build.yml +++ b/.github/workflows/win-build.yml @@ -23,7 +23,6 @@ jobs: matrix: config: - "OPTS=none" - - "OPTS=static" - "OPTS=symbols" steps: - name: Checkout Tk -- cgit v0.12 From dcfc048bfc768826800705c75df17091a6b7d185 Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Wed, 3 Jan 2024 14:19:17 +0000 Subject: unnecessary check for $last >= 0 --- library/tearoff.tcl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/library/tearoff.tcl b/library/tearoff.tcl index 3a63b17..e52a457 100644 --- a/library/tearoff.tcl +++ b/library/tearoff.tcl @@ -138,7 +138,7 @@ proc ::tk::MenuDup {src dst type} { # Copy the meny entries, if any set last [$src index last] - if {$last ne "none" && $last >= 0} { + if {$last ne "none"} { for {set i [$src cget -tearoff]} {$i <= $last} {incr i} { set cmd [list $dst add [$src type $i]] foreach option [$src entryconfigure $i] { -- cgit v0.12