"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "lib/Perl/Tidy/IOScalarArray.pm" between
Perl-Tidy-20210402.tar.gz and Perl-Tidy-20210717.tar.gz

About: Perltidy is a Perl script indenter and reformatter (beautifier).

IOScalarArray.pm  (Perl-Tidy-20210402):IOScalarArray.pm  (Perl-Tidy-20210717)
skipping to change at line 17 skipping to change at line 17
# #
# NOTE: this routine assumes that there aren't any embedded # NOTE: this routine assumes that there aren't any embedded
# newlines within any of the array elements. There are no checks # newlines within any of the array elements. There are no checks
# for that. # for that.
# #
##################################################################### #####################################################################
package Perl::Tidy::IOScalarArray; package Perl::Tidy::IOScalarArray;
use strict; use strict;
use warnings; use warnings;
use Carp; use Carp;
our $VERSION = '20210402'; our $VERSION = '20210717';
sub AUTOLOAD { sub AUTOLOAD {
# Catch any undefined sub calls so that we are sure to get # Catch any undefined sub calls so that we are sure to get
# some diagnostic information. This sub should never be called # some diagnostic information. This sub should never be called
# except for a programming error. # except for a programming error.
our $AUTOLOAD; our $AUTOLOAD;
return if ( $AUTOLOAD =~ /\bDESTROY$/ ); return if ( $AUTOLOAD =~ /\bDESTROY$/ );
my ( $pkg, $fname, $lno ) = caller(); my ( $pkg, $fname, $lno ) = caller();
my $my_package = __PACKAGE__; my $my_package = __PACKAGE__;
 End of changes. 1 change blocks. 
1 lines changed or deleted 1 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)