summaryrefslogtreecommitdiffstats
path: root/tests/main.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/main.test')
-rw-r--r--tests/main.test6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/main.test b/tests/main.test
index 4e91478..12afa46 100644
--- a/tests/main.test
+++ b/tests/main.test
@@ -1,6 +1,6 @@
# This file contains a collection of tests for generic/tclMain.c.
#
-# RCS: @(#) $Id: main.test,v 1.13.2.3 2006/05/05 18:08:58 dgp Exp $
+# RCS: @(#) $Id: main.test,v 1.13.2.4 2006/09/04 21:36:55 dgp Exp $
if {[catch {package require tcltest 2.0.2}]} {
puts stderr "Skipping tests in [info script]. tcltest 2.0.2 required."
@@ -488,7 +488,7 @@ namespace eval ::tcl::test::main {
}
} rc]
} -body {
- exec [interpreter] << {puts "In script"} \
+ exec [interpreter] << {} \
-appinitprocsetrcfile $rc >& result
set f [open result]
read $f
@@ -497,7 +497,7 @@ namespace eval ::tcl::test::main {
file delete result
removeFile rc
} -result "application-specific initialization failed:\
- \nIn script\nExit MainLoop\nIn exit\neven 0\n"
+ \nExit MainLoop\nIn exit\neven 0\n"
test Tcl_Main-4.5 {
Tcl_Main: Bug 1481986