From 53285721f96ad476c4855909e999cfcdb0362e5c Mon Sep 17 00:00:00 2001
From: mdejong <mdejong>
Date: Fri, 7 Mar 2003 21:40:26 +0000
Subject: 	* tests/encoding.test: Name temp files *.tcltestout 
 instead of *.out so that when they are removed later, 	we don't accidently
 toast any files named *.out that 	the user has created in the build
 directory.

---
 ChangeLog           |  7 +++++++
 tests/encoding.test | 10 +++++-----
 2 files changed, 12 insertions(+), 5 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index b806f78..63dfa6a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2003-03-07  Mo DeJong  <mdejong@users.sourceforge.net>
+
+	* tests/encoding.test: Name temp files *.tcltestout
+	instead of *.out so that when they are removed later,
+	we don't accidently toast any files named *.out that
+	the user has created in the build directory.
+
 2003-03-07  Donal K. Fellows  <fellowsd@cs.man.ac.uk>
 
 	* generic/tclCmdAH.c (Tcl_FileObjCmd): Fix the setting of a file's
diff --git a/tests/encoding.test b/tests/encoding.test
index 2ea4463..bb19128 100644
--- a/tests/encoding.test
+++ b/tests/encoding.test
@@ -8,7 +8,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: encoding.test,v 1.16 2003/02/21 02:40:58 hobbs Exp $
+# RCS: @(#) $Id: encoding.test,v 1.17 2003/03/07 21:40:28 mdejong Exp $
 
 package require tcltest 2
 namespace import -force ::tcltest::*
@@ -520,16 +520,16 @@ foreach from {cp932 shiftjis euc-jp iso2022-jp} {
 	    cd [temporaryDirectory]
 	    set f [open $from.chars]
 	    fconfigure $f -encoding $from
-	    set out [open $from.$to.out w]
+	    set out [open $from.$to.tcltestout w]
 	    fconfigure $out -encoding $to
 	    puts -nonewline $out [read $f]
 	    close $out
 	    close $f
 	    
-	    # then compare $to.chars <=> $from.to.out as binary.
+	    # then compare $to.chars <=> $from.to.tcltestout as binary.
 	    set fa [open $to.chars]
 	    fconfigure $fa -encoding binary
-	    set fb [open $from.$to.out]
+	    set fb [open $from.$to.tcltestout]
 	    fconfigure $fb -encoding binary
 	    set diff [channel-diff $fa $fb]
 	    close $fa
@@ -541,7 +541,7 @@ foreach from {cp932 shiftjis euc-jp iso2022-jp} {
     }
 }
 
-eval [list file delete] [glob -directory [temporaryDirectory] *.chars *.out]
+eval [list file delete] [glob -directory [temporaryDirectory] *.chars *.tcltestout]
 # ===> Cut here <===
 
 # EscapeFreeProc, GetTableEncoding, unilen
-- 
cgit v0.12