summaryrefslogtreecommitdiffstats
path: root/tests/winClipboard.test
diff options
context:
space:
mode:
authorhobbs <hobbs>1999-12-14 06:53:11 (GMT)
committerhobbs <hobbs>1999-12-14 06:53:11 (GMT)
commitcc105ac04d3d06c27918887b8157b2fa3f8f9e62 (patch)
tree9cf936e1b6b3abcdf9ad5fd0f58caa549f438d21 /tests/winClipboard.test
parent62e9e6611d2da6b8113210d5002611c40909231e (diff)
downloadtk-cc105ac04d3d06c27918887b8157b2fa3f8f9e62.zip
tk-cc105ac04d3d06c27918887b8157b2fa3f8f9e62.tar.gz
tk-cc105ac04d3d06c27918887b8157b2fa3f8f9e62.tar.bz2
* tests/bind.test:
* tests/canvImg.test: * tests/canvPsArc.tcl: * tests/canvPsImg.tcl: (new file) * tests/canvRect.test: * tests/canvText.test: * tests/canvas.test: * tests/defs.tcl: * tests/entry.test: * tests/event.test: * tests/font.test: * tests/frame.test: * tests/imgPhoto.test: * tests/safe.test: * tests/scale.test: * tests/scrollbar.test: * tests/select.test: * tests/text.test: * tests/textDisp.test: * tests/textTag.test: * tests/unixFont.test: * tests/unixWm.test: * tests/visual_bb.test: * tests/winClipboard.test: tests for the dash patch changes
Diffstat (limited to 'tests/winClipboard.test')
-rw-r--r--tests/winClipboard.test8
1 files changed, 7 insertions, 1 deletions
diff --git a/tests/winClipboard.test b/tests/winClipboard.test
index 492ced9..e693c6a 100644
--- a/tests/winClipboard.test
+++ b/tests/winClipboard.test
@@ -10,7 +10,7 @@
# Copyright (c) 1998-1999 by Scriptics Corporation.
# All rights reserved.
#
-# RCS: @(#) $Id: winClipboard.test,v 1.5 1999/05/22 01:59:22 stanton Exp $
+# RCS: @(#) $Id: winClipboard.test,v 1.6 1999/12/14 06:53:15 hobbs Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
source [file join [pwd] [file dirname [info script]] defs.tcl]
@@ -19,6 +19,12 @@ if {[lsearch [namespace children] ::tcltest] == -1} {
# Note that these tests may fail if another application is grabbing the
# clipboard (e.g. an X server)
+if {[llength [info command testclipboard]] == 0} {
+ puts "\"testclipboard\" isn't defined, skipping winClipboard tests"
+ ::tcltest::cleanupTests
+ return
+}
+
test winClipboard-1.1 {TkSelGetSelection} {pcOnly} {
clipboard clear
catch {selection get -selection CLIPBOARD} msg