From cf90a21ebd2262e09730a5a55c5ccb62f1622fad Mon Sep 17 00:00:00 2001
From: Mark Murray <markm@FreeBSD.org>
Date: Sat, 16 Mar 2002 20:14:31 +0000
Subject: Vendor import Perl 5.6.1

---
 contrib/perl5/t/lib/tie-splice.t | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100755 contrib/perl5/t/lib/tie-splice.t

(limited to 'contrib/perl5/t/lib/tie-splice.t')

diff --git a/contrib/perl5/t/lib/tie-splice.t b/contrib/perl5/t/lib/tie-splice.t
new file mode 100755
index 0000000000000..d7ea6cc1dcc6f
--- /dev/null
+++ b/contrib/perl5/t/lib/tie-splice.t
@@ -0,0 +1,17 @@
+#!./perl
+
+BEGIN {
+    chdir 't' if -d 't';
+    @INC = '.'; 
+    push @INC, '../lib';
+}
+
+# bug id 20001020.002
+# -dlc 20001021
+
+use Tie::Array;
+tie @a,Tie::StdArray;
+undef *Tie::StdArray::SPLICE;
+require "op/splice.t"
+
+# Pre-fix, this failed tests 6-9
-- 
cgit v1.2.3