"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "lib/Gscan2pdf/Bboxtree.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).

Bboxtree.pm  (gscan2pdf-2.13.1.tar.xz):Bboxtree.pm  (gscan2pdf-2.13.2.tar.xz)
package Gscan2pdf::Bboxtree; package Gscan2pdf::Bboxtree;
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 HTML::TokeParser; use HTML::TokeParser;
use Encode qw(decode_utf8 encode_utf8); use Encode qw(decode_utf8 encode_utf8);
use Glib qw(TRUE FALSE); # To get TRUE and FALSE use Glib qw(TRUE FALSE); # To get TRUE and FALSE
use Gscan2pdf::Document; use Gscan2pdf::Document;
use Carp; use Carp;
use JSON::PP; use JSON::PP;
#use Text::Balanced qw ( extract_bracketed ); #use Text::Balanced qw ( extract_bracketed );
use Readonly; use Readonly;
Readonly my $EMPTY_LIST => -1; Readonly my $EMPTY_LIST => -1;
Readonly my $HALF => 0.5; Readonly my $HALF => 0.5;
my $EMPTY = q{}; my $EMPTY = q{};
my $SPACE = q{ }; my $SPACE = q{ };
my $DOUBLE_QUOTES = q{"}; my $DOUBLE_QUOTES = q{"};
my $BBOX_REGEX = qr{(\d+)\s+(\d+)\s+(\d+)\s+(\d+)}xsm; my $BBOX_REGEX = qr{(\d+)\s+(\d+)\s+(\d+)\s+(\d+)}xsm;
my $HILITE_REGEX = qr{[(]hilite\s+[#][A-Fa-f\d]{6}[)]\s+[(]xor[)]}xsm; my $HILITE_REGEX = qr{[(]hilite\s+[#][A-Fa-f\d]{6}[)]\s+[(]xor[)]}xsm;
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)