From fdc7a9f2b597e7b1e3c531726f65bb19a85628af Mon Sep 17 00:00:00 2001
From: "M. J. T. Guy" <mjtg@cus.cam.ac.uk>
Date: Thu, 20 Jul 2000 19:49:18 +0100
Subject: [PATCH] The output might have been produced in the wrong order.

Subject: [ID 20000720.003] [PATCH] t/op/write.t
Message-Id: <E13FKRi-0004rF-00@libra.cus.cam.ac.uk>

p4raw-id: //depot/perl@6425
---
 t/op/write.t | 1 +
 1 file changed, 1 insertion(+)

diff --git a/t/op/write.t b/t/op/write.t
index 593c69a..5b01eb7 100755
--- a/t/op/write.t
+++ b/t/op/write.t
@@ -200,6 +200,7 @@ $this,$that
     write LEX;
     $that = 8;
     write LEX;
+    close LEX;
 }
 # LEX_INTERPNORMAL test
 my %e = ( a => 1 );
-- 
2.7.4