From 35987bce60a984aa06f0f4584ee87933cf16fbda Mon Sep 17 00:00:00 2001
From: dkf <donal.k.fellows@manchester.ac.uk>
Date: Mon, 20 Jul 2009 23:10:05 +0000
Subject: More fixes for [Bug 2824378]

---
 tests/select.test | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/tests/select.test b/tests/select.test
index 1c072da..cdc95b6 100644
--- a/tests/select.test
+++ b/tests/select.test
@@ -6,7 +6,7 @@
 # Copyright (c) 1998-1999 by Scriptics Corporation.
 # All rights reserved.
 #
-# RCS: @(#) $Id: select.test,v 1.16 2005/11/13 21:58:16 dkf Exp $
+# RCS: @(#) $Id: select.test,v 1.16.4.1 2009/07/20 23:10:05 dkf Exp $
 
 #
 # Note: Multiple display selection handling will only be tested if the
@@ -796,7 +796,7 @@ test select-9.1 {SelCvtToX and SelCvtFromX procedures} -setup {
     lappend result [dobg {selection get TEST}]
     cleanupbg
     lappend result $selInfo
-} -result {0x400 {TEST 0 4000}}
+} -result {{0x400 } {TEST 0 4000}}
 test select-9.2 {SelCvtToX and SelCvtFromX procedures} unix {
     setup
     setupbg
@@ -808,7 +808,7 @@ test select-9.2 {SelCvtToX and SelCvtFromX procedures} unix {
     lappend result [dobg {selection get TEST}]
     cleanupbg
     lappend result $selInfo
-} {{0x400 0xffff 0x800 0xfffffffe} {TEST 0 4000}}
+} {{0x400 0xffff 0x800 0xfffffffe } {TEST 0 4000}}
 test select-9.3 {SelCvtToX and SelCvtFromX procedures} unix {
     setup
     setupbg
@@ -820,7 +820,7 @@ test select-9.3 {SelCvtToX and SelCvtFromX procedures} unix {
     lappend result [dobg {selection get TEST}]
     cleanupbg
     lappend result $selInfo
-} {{} {TEST 0 4000}}
+} {{ } {TEST 0 4000}}
 test select-9.4 {SelCvtToX and SelCvtFromX procedures} unix {
     setup
     setupbg
@@ -832,7 +832,7 @@ test select-9.4 {SelCvtToX and SelCvtFromX procedures} unix {
     lappend result [dobg {selection get TEST}]
     cleanupbg
     lappend result $selInfo
-} {{0x10 0x0 0x20} {TEST 0 4000}}
+} {{0x10 0x0 0x20 } {TEST 0 4000}}
 test select-9.5 {SelCvtToX and SelCvtFromX procedures} -setup {
     setup
     setupbg
@@ -971,7 +971,7 @@ test select-12.1 {DefaultSelection procedure} unix {
     lappend result [dobg {selection get -type TIMESTAMP}]
     cleanupbg
     set result
-} {0x0 0x0}
+} {0x0 {0x0 }}
 test select-12.2 {DefaultSelection procedure} unix {
     setup
     set result [lsort [list [selection get -type TARGETS]]]
-- 
cgit v0.12