diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-07-01 12:19:19 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-07-01 12:19:19 (GMT) |
| commit | 5deab2db9a71d3a663c1804a6249adfc773c7d5d (patch) | |
| tree | 8994cf49d135876a78728b20fc45904e5de9d10e | |
| parent | c9b34b133759197c64efea804480ca15824154f9 (diff) | |
| download | tk-5deab2db9a71d3a663c1804a6249adfc773c7d5d.zip tk-5deab2db9a71d3a663c1804a6249adfc773c7d5d.tar.gz tk-5deab2db9a71d3a663c1804a6249adfc773c7d5d.tar.bz2 | |
Disable entry-3.24 testcase on XQuartz. See: [36e379c01b], which is now visible in GITHUB.
| -rw-r--r-- | tests/entry.test | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/entry.test b/tests/entry.test index f51b739..49f47b2 100644 --- a/tests/entry.test +++ b/tests/entry.test @@ -11,6 +11,8 @@ namespace import ::tcltest::* eval tcltest::configure $argv tcltest::loadTestedCommands +testConstraint failsOnXQuarz [expr {$tcl_platform(os) ne "Darwin" || [tk windowingsystem] ne "x11" }] + # For xscrollcommand set scrollInfo {} proc scroll args { @@ -874,7 +876,7 @@ test entry-3.23 {EntryWidgetCmd procedure, "delete" widget command} -setup { } -cleanup { destroy .e } -result 0123457890 -test entry-3.24 {EntryWidgetCmd procedure, "delete" widget command} -setup { +test entry-3.24 {EntryWidgetCmd procedure, "delete" widget command} -constraints failsOnXQuarz -setup { entry .e pack .e ; update idletasks update |