"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "t/157_save_hocr_multipage.t" 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).

157_save_hocr_multipage.t  (gscan2pdf-2.13.1.tar.xz):157_save_hocr_multipage.t  (gscan2pdf-2.13.2.tar.xz)
skipping to change at line 59 skipping to change at line 59
</body> </body>
</html> </html>
EOS EOS
$slist->import_files( $slist->import_files(
paths => [ 'test.pnm', 'test.pnm' ], paths => [ 'test.pnm', 'test.pnm' ],
finished_callback => sub { finished_callback => sub {
$slist->{data}[0][2]->import_hocr($hocr); $slist->{data}[0][2]->import_hocr($hocr);
$slist->{data}[1][2]->import_hocr($hocr); $slist->{data}[1][2]->import_hocr($hocr);
$slist->save_hocr( $slist->save_hocr(
path => 'test.txt', path => 'test.txt',
list_of_pages => list_of_pages =>
[ $slist->{data}[0][2]{uuid}, $slist->{data}[1][2]{uuid} ], [ $slist->{data}[0][2]{uuid}, $slist->{data}[1][2]{uuid} ],
finished_callback => sub { Gtk3->main_quit } finished_callback => sub { Gtk3->main_quit }
); );
} }
); );
Gtk3->main; Gtk3->main;
my $expected = <<"EOS"; my $expected = <<"EOS";
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
 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)