"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "lib/Gscan2pdf/Page.pm" between
gscan2pdf-2.13.1.tar.xz and gscan2pdf-2.13.2.tar.xz

About: gscan2pdf is a GUI to produce PDFs from scanned documents (using Perl).

Page.pm  (gscan2pdf-2.13.1.tar.xz):Page.pm  (gscan2pdf-2.13.2.tar.xz)
package Gscan2pdf::Page; package Gscan2pdf::Page;
use 5.008005; use 5.008005;
use strict; use strict;
use warnings; use warnings;
use feature 'switch'; use feature 'switch';
no if $] >= 5.018, warnings => 'experimental::smartmatch'; no if $] >= 5.018, warnings => 'experimental::smartmatch';
use Carp; use Carp;
use Glib qw(TRUE FALSE); # To get TRUE and FALSE use Glib qw(TRUE FALSE); # To get TRUE and FALSE
use File::Copy; use File::Copy;
use File::Temp; # To create temporary files use File::Temp; # To create temporary files
use Image::Magick; use Image::Magick;
use POSIX qw(locale_h); use POSIX qw(locale_h);
use Data::UUID; use Data::UUID;
use English qw( -no_match_vars ); # for $ERRNO use English qw( -no_match_vars ); # for $ERRNO
use Try::Tiny; use Try::Tiny;
use Gscan2pdf::Document; use Gscan2pdf::Document;
use Gscan2pdf::Bboxtree; use Gscan2pdf::Bboxtree;
use Gscan2pdf::Translation '__'; # easier to extract strings with xgettext use Gscan2pdf::Translation '__'; # easier to extract strings with xgettext
skipping to change at line 34 skipping to change at line 34
Readonly my $PAGE_TOLERANCE => 0.02; Readonly my $PAGE_TOLERANCE => 0.02;
Readonly my $EMPTY_LIST => -1; Readonly my $EMPTY_LIST => -1;
my $EMPTY = q{}; my $EMPTY = q{};
my $SPACE = q{ }; my $SPACE = q{ };
my $DOUBLE_QUOTES = q{"}; my $DOUBLE_QUOTES = q{"};
BEGIN { BEGIN {
use Exporter (); use Exporter ();
our ( $VERSION, @EXPORT_OK, %EXPORT_TAGS ); our ( $VERSION, @EXPORT_OK, %EXPORT_TAGS );
$VERSION = '2.13.1'; $VERSION = '2.13.2';
use base qw(Exporter); use base qw(Exporter);
%EXPORT_TAGS = (); # eg: TAG => [ qw!name1 name2! ], %EXPORT_TAGS = (); # eg: TAG => [ qw!name1 name2! ],
# your exported package globals go here, # your exported package globals go here,
# as well as any optionally exported functions # as well as any optionally exported functions
@EXPORT_OK = qw(); @EXPORT_OK = qw();
} }
our @EXPORT_OK; our @EXPORT_OK;
 End of changes. 2 change blocks. 
2 lines changed or deleted 2 lines changed or added

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