summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.berkeley.edu>1999-09-26 12:52:31 -0400
committerJarkko Hietaniemi <jhi@iki.fi>1999-09-27 07:47:11 +0000
commit9bea678f36dc293400ada67aa122ef456a9dcf74 (patch)
treeb3fa6990fd543a6005d20e3c0d5eb99a47fc63ea /lib
parentcfeeb0228b26a4e0f4b8a5b8a0a0093bc6c94ba3 (diff)
downloadperl-9bea678f36dc293400ada67aa122ef456a9dcf74.tar.gz
Finalize change #4232.
To: Jarkko Hietaniemi <jhi@iki.fi> Cc: gsar@activestate.com, Mailing list Perl5 <perl5-porters@perl.org> Subject: Re: xsubpp change breaks B, DB_File, POSIX builds Message-ID: <19990926165230.A26933@monk.mps.ohio-state.edu> p4raw-link: @4232 on //depot/cfgperl: ddf6bed10156a8078a4c99edf2247bc17af67666 p4raw-id: //depot/cfgperl@4240
Diffstat (limited to 'lib')
-rwxr-xr-xlib/ExtUtils/xsubpp2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/ExtUtils/xsubpp b/lib/ExtUtils/xsubpp
index 3463e0088a..a8508b38c3 100755
--- a/lib/ExtUtils/xsubpp
+++ b/lib/ExtUtils/xsubpp
@@ -390,7 +390,7 @@ sub INPUT_handler {
if ($name_printed) {
print ";\n";
} else {
- print "\t$var_name_after;\n";
+ print "\t$var_name;\n";
}
} elsif ($var_init =~ /\S/) {
&output_init($var_type, $var_num, $var_name, $var_init, $name_printed);