Update Archive-Extract to cpan version 0.38

[p5sagit/p5-mst-13.2.git] / mad / Nomad.pm

diff --git a/mad/Nomad.pm b/mad/Nomad.pm
old mode 100755 (executable)
new mode 100644 (file)
index 5ccda4f..eaac474
--- a/mad/Nomad.pm
+++ b/mad/Nomad.pm
@@ -674,7 +674,7 @@ sub ast {
        return P5AST::listop->new(Kids => [@before,@retval]);
     }
 
-    push @retval, $self->madness('o ( [ {');
+    push @retval, $self->madness('o d ( [ {');
 
     my @newkids;
     for my $kid (@{$$self{Kids}}) {
@@ -2838,6 +2838,7 @@ package PLXML::op_enterwrite;
 package PLXML::op_leavewrite;
 package PLXML::op_prtf;
 package PLXML::op_print;
+package PLXML::op_say;
 package PLXML::op_sysopen;
 package PLXML::op_sysseek;
 package PLXML::op_sysread;