From: Nick Ing-Simmons <nik@tiuk.ti.com>
Date: Mon, 5 Mar 2001 23:08:17 +0000 (+0000)
Subject: skipping USE_PERLIO symbols correction.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5138f91426baaaf2b1b29e96c14ea3e0fa029755;hp=016cb72cf9c105870bee6a8400914494bc6b9d12;p=p5sagit%2Fp5-mst-13.2.git

skipping USE_PERLIO symbols correction.

p4raw-id: //depot/perlio@9052
---

diff --git a/makedef.pl b/makedef.pl
index da0b36c..88c2d88 100644
--- a/makedef.pl
+++ b/makedef.pl
@@ -589,7 +589,7 @@ if ($define{'USE_PERLIO'}) {
 			 PerlIO_write
 			 )];
     }
-    else {
+} else {
 	# Skip the PerlIO New Generation symbols.
 	skip_symbols [qw(
 			 PerlIOBase_clearerr
@@ -618,8 +618,7 @@ if ($define{'USE_PERLIO'}) {
 			 PerlIO_push
 			 PerlIO_unread
 			)];
-    }
-}
+} 
 
 for my $syms (@syms) {
     open (GLOBAL, "<$syms") || die "failed to open $syms: $!\n";