diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-30 10:30:45 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-09-30 10:30:45 (GMT) |
| commit | 2cfcf649ca494a8a1a8b733fa9fbe9b033d7dfdd (patch) | |
| tree | 3cbc19ff9eb3b72707f5c5f24291d983bccdc072 /tests/entry.test | |
| parent | e883cc84772de84b5cbb175808ecad82d5112a04 (diff) | |
| download | tk-2cfcf649ca494a8a1a8b733fa9fbe9b033d7dfdd.zip tk-2cfcf649ca494a8a1a8b733fa9fbe9b033d7dfdd.tar.gz tk-2cfcf649ca494a8a1a8b733fa9fbe9b033d7dfdd.tar.bz2 | |
Mark 10 testcases with failsOnUbuntuNoXft. They fail on Ubuntu if Tk is compiled with --disable-xft
Diffstat (limited to 'tests/entry.test')
| -rw-r--r-- | tests/entry.test | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/tests/entry.test b/tests/entry.test index 0146dbf..f1d61b2 100644 --- a/tests/entry.test +++ b/tests/entry.test @@ -11,6 +11,9 @@ namespace import ::tcltest::* eval tcltest::configure $argv tcltest::loadTestedCommands +testConstraint failsOnUbuntu [expr {![info exists ::env(TRAVIS_OS_NAME)] || ![string match linux $::env(TRAVIS_OS_NAME)]}] +testConstraint failsOnUbuntuNoXft [expr {[testConstraint failsOnUbuntu] || ([catch {tk::pkgconfig get fontsystem} fs] || ($fs ne "xft"))}] + # For xscrollcommand set scrollInfo {} proc scroll args { @@ -2311,7 +2314,7 @@ test entry-8.17 {DeleteChars procedure} -setup { } -cleanup { destroy .e } -result 4 -test entry-8.18 {DeleteChars procedure} -setup { +test entry-8.18 {DeleteChars procedure} -constraints failsOnUbuntuNoXft -setup { entry .e -width 0 -font {Courier -12} -highlightthickness 2 -bd 2 pack .e focus .e |