[svk-commit] r2240 - branches/2.0-releng/t

[nobody at bestpractical.com]

Author: clkao
Date: Fri Dec 15 11:27:06 2006
New Revision: 2240

Modified:
   branches/2.0-releng/t/07smerge-external.t

Log:
Fix tests under a french locale, which is due to unwanted
variable interpolation.

Submitted by: Rafael Garcia-Suarez <rgarciasuarez at gmail.com>


Modified: branches/2.0-releng/t/07smerge-external.t
==============================================================================
--- branches/2.0-releng/t/07smerge-external.t	(original)
+++ branches/2.0-releng/t/07smerge-external.t	Fri Dec 15 11:27:06 2006
@@ -147,7 +147,7 @@
 
 set_editor(<< "TMP");
 \$_ = shift;
-open _, ">\$_" or die $!;
+open _, ">\$_" or die \$!;
 print _ "edited\\n";
 TMP
 
@@ -168,7 +168,7 @@
 
 set_editor(<< "TMP");
 \$_ = \$ARGV[6];
-open _, ">\$_" or die $!;
+open _, ">\$_" or die \$!;
 print _ "merged\\n";
 TMP
 
@@ -243,7 +243,7 @@
 $answer = 'a';
 set_editor(<< "TMP");
 \$_ = shift;
-open _, ">\$_" or die $!;
+open _, ">\$_" or die \$!;
 print _ "merged\\n";
 TMP
 is_output_like ($svk, 'sm', ['-C', '//trunk', '//local'],