From 7727845c8d025efed8146edac43eee0ce5741b4c Mon Sep 17 00:00:00 2001
From: dkf <donal.k.fellows@manchester.ac.uk>
Date: Wed, 19 May 2004 10:47:28 +0000
Subject: Remove trailing whitespace

---
 tests/case.test    | 14 +-------------
 tests/join.test    | 14 +-------------
 tests/result.test  | 12 ------------
 tests/split.test   | 14 +-------------
 tests/uplevel.test | 14 +-------------
 5 files changed, 4 insertions(+), 64 deletions(-)

diff --git a/tests/case.test b/tests/case.test
index 997cecb..477538c 100644
--- a/tests/case.test
+++ b/tests/case.test
@@ -11,7 +11,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: case.test,v 1.5 2000/04/10 17:18:57 ericm Exp $
+# RCS: @(#) $Id: case.test,v 1.6 2004/05/19 10:52:35 dkf Exp $
 
 if {[lsearch [namespace children] ::tcltest] == -1} {
     package require tcltest
@@ -89,15 +89,3 @@ test case-3.3 {single-argument form for pattern/command pairs} {
 # cleanup
 ::tcltest::cleanupTests
 return
-
-
-
-
-
-
-
-
-
-
-
-
diff --git a/tests/join.test b/tests/join.test
index e464103..562c3e0 100644
--- a/tests/join.test
+++ b/tests/join.test
@@ -11,7 +11,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: join.test,v 1.5 2000/04/10 17:19:01 ericm Exp $
+# RCS: @(#) $Id: join.test,v 1.6 2004/05/19 10:51:06 dkf Exp $
 
 if {[lsearch [namespace children] ::tcltest] == -1} {
     package require tcltest
@@ -52,15 +52,3 @@ test join-3.2 {join is binary ok} {
 # cleanup
 ::tcltest::cleanupTests
 return
-
-
-
-
-
-
-
-
-
-
-
-
diff --git a/tests/result.test b/tests/result.test
index f0fb9e3..8054b75 100644
--- a/tests/result.test
+++ b/tests/result.test
@@ -89,15 +89,3 @@ test result-4.5 {Tcl_SetObjErrorCode - five args} {testsaveresult} {
 # cleanup
 ::tcltest::cleanupTests
 return
-
-
-
-
-
-
-
-
-
-
-
-
diff --git a/tests/split.test b/tests/split.test
index 0ad879b..93b0cc4 100644
--- a/tests/split.test
+++ b/tests/split.test
@@ -11,7 +11,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: split.test,v 1.8 2002/11/12 02:25:24 hobbs Exp $
+# RCS: @(#) $Id: split.test,v 1.9 2004/05/19 10:50:30 dkf Exp $
 
 if {[lsearch [namespace children] ::tcltest] == -1} {
     package require tcltest
@@ -84,15 +84,3 @@ test split-2.2 {split errors} {
 catch {rename foo {}}
 ::tcltest::cleanupTests
 return
-
-
-
-
-
-
-
-
-
-
-
-
diff --git a/tests/uplevel.test b/tests/uplevel.test
index d21e637..b8bbbb7 100644
--- a/tests/uplevel.test
+++ b/tests/uplevel.test
@@ -11,7 +11,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: uplevel.test,v 1.7 2002/08/08 18:19:37 msofer Exp $
+# RCS: @(#) $Id: uplevel.test,v 1.8 2004/05/19 10:47:28 dkf Exp $
 
 if {[lsearch [namespace children] ::tcltest] == -1} {
     package require tcltest
@@ -130,15 +130,3 @@ test uplevel-6.1 {uplevel and shadowed cmds} {
 # cleanup
 ::tcltest::cleanupTests
 return
-
-
-
-
-
-
-
-
-
-
-
-
-- 
cgit v0.12