From: Gurusamy Sarathy <gsar@cpan.org>
Date: Thu, 15 Oct 1998 23:53:25 +0000 (+0000)
Subject: s/last/first/ typo in append_list()
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=acb746053d23ffdeb058c98e7148ae317e2c9b9d;p=p5sagit%2Fp5-mst-13.2.git

s/last/first/ typo in append_list()

p4raw-id: //depot/perl@1974
---

diff --git a/op.c b/op.c
index eb4856e..0ad5650 100644
--- a/op.c
+++ b/op.c
@@ -1917,7 +1917,7 @@ append_list(I32 type, LISTOP *first, LISTOP *last)
     first->op_last = last->op_last;
     first->op_children += last->op_children;
     if (first->op_children)
-	last->op_flags |= OPf_KIDS;
+	first->op_flags |= OPf_KIDS;
 
     Safefree(last);
     return (OP*)first;