From 3c38d311e45c88777c457a79bf487bed17e43ab4 Mon Sep 17 00:00:00 2001
From: jenn <jenn>
Date: Tue, 29 Jun 1999 03:22:06 +0000
Subject: Modified the last three tests to run with pcOnly constraint.

---
 tests/winDde.test | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/tests/winDde.test b/tests/winDde.test
index 67c9c83..e160ce2 100644
--- a/tests/winDde.test
+++ b/tests/winDde.test
@@ -9,7 +9,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: winDde.test,v 1.6 1999/06/28 23:49:32 redman Exp $
+# RCS: @(#) $Id: winDde.test,v 1.7 1999/06/29 03:22:06 jenn Exp $
 
 if {[lsearch [namespace children] ::tcltest] == -1} {
     package require tcltest
@@ -145,17 +145,17 @@ test winDde-4.4 {DDE eval locally} {pcOnly} {
     set a
 } foo
 
-test winDde-5.1 {check for bad arguments} {} {
+test winDde-5.1 {check for bad arguments} {pcOnly} {
     catch {dde execute "" "" "" ""} result
     set result
 } {wrong # args: should be "dde execute ?-async? serviceName topicName value"}
 
-test winDde-5.2 {check for bad arguments} {} {
+test winDde-5.2 {check for bad arguments} {pcOnly} {
     catch {dde execute "" "" ""} result
     set result
 } {cannot execute null data}
 
-test winDde-5.3 {check for bad arguments} {} {
+test winDde-5.3 {check for bad arguments} {pcOnly} {
     catch {dde execute -foo "" "" ""} result
     set result
 } {wrong # args: should be "dde execute ?-async? serviceName topicName value"}
-- 
cgit v0.12