summaryrefslogtreecommitdiffstats
path: root/tests/cursor.test
diff options
context:
space:
mode:
authordas <das>2004-03-17 18:15:28 (GMT)
committerdas <das>2004-03-17 18:15:28 (GMT)
commit65423864cf9618016945cddd968b3f2c4343dcfc (patch)
treea4d842ff3e2a8fc34e8fd25e2322f00537fdfae9 /tests/cursor.test
parenta69b5b4fefe30134396d6269d0eca5fff4ba8500 (diff)
downloadtk-65423864cf9618016945cddd968b3f2c4343dcfc.zip
tk-65423864cf9618016945cddd968b3f2c4343dcfc.tar.gz
tk-65423864cf9618016945cddd968b3f2c4343dcfc.tar.bz2
Removed support for Mac OS Classic platform [Patch 918139]
Diffstat (limited to 'tests/cursor.test')
-rw-r--r--tests/cursor.test21
1 files changed, 1 insertions, 20 deletions
diff --git a/tests/cursor.test b/tests/cursor.test
index ab042d5..9da3539 100644
--- a/tests/cursor.test
+++ b/tests/cursor.test
@@ -6,7 +6,7 @@
# Copyright (c) 1998-1999 by Scriptics Corporation.
# All rights reserved.
#
-# RCS: @(#) $Id: cursor.test,v 1.10 2003/07/24 02:10:01 patthoyts Exp $
+# RCS: @(#) $Id: cursor.test,v 1.11 2004/03/17 18:15:49 das Exp $
package require tcltest 2.1
eval tcltest::configure $argv
@@ -260,25 +260,6 @@ foreach cursor {
unset n
# -------------------------------------------------------------------------
-# Check the Mac specific cursors
-set n 0
-foreach cursor {
- text
- cross-hair
-} {
- test cursor-8.$n {check cursor $cursor} \
- -constraints {macOnly} \
- -setup {button .b -text $cursor} \
- -body {
- list [catch {.b configure -cursor $cursor} msg] $msg
- } \
- -cleanup {destroy .b} \
- -result {0 {}}
- incr n
-}
-unset n
-
-# -------------------------------------------------------------------------
destroy .t