ListIter.pm (gscan2pdf-2.13.1.tar.xz) | : | ListIter.pm (gscan2pdf-2.13.2.tar.xz) | ||
---|---|---|---|---|
package Gscan2pdf::Canvas::ListIter; | package Gscan2pdf::Canvas::ListIter; | |||
use strict; | use strict; | |||
use warnings; | use warnings; | |||
use POSIX qw/ceil/; | use POSIX qw/ceil/; | |||
use Readonly; | use Readonly; | |||
Readonly my $EMPTY_LIST => -1; | Readonly my $EMPTY_LIST => -1; | |||
our $VERSION = '2.13.1'; | our $VERSION = '2.13.2'; | |||
sub new { | sub new { | |||
my ($class) = @_; | my ($class) = @_; | |||
my $self = {}; | my $self = {}; | |||
$self->{list} = []; | $self->{list} = []; | |||
$self->{index} = $EMPTY_LIST; | $self->{index} = $EMPTY_LIST; | |||
return bless $self, $class; | return bless $self, $class; | |||
} | } | |||
sub get_first_bbox { | sub get_first_bbox { | |||
End of changes. 1 change blocks. | ||||
1 lines changed or deleted | 1 lines changed or added |