"Fossies" - the Fresh Open Source Software Archive  

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

0624_Dialog_Scan_CLI.t  (gscan2pdf-2.13.1.tar.xz)	:	0624_Dialog_Scan_CLI.t  (gscan2pdf-2.13.2.tar.xz)
skipping to change at line 94		skipping to change at line 94
my ( $widget, $process, $msg ) = @_;		my ( $widget, $process, $msg ) = @_;
Gtk3->main_quit;		Gtk3->main_quit;
}		}
);		);
$dialog->set( 'num-pages', 1 );		$dialog->set( 'num-pages', 1 );
$dialog->set( 'page-number-increment', 1 );		$dialog->set( 'page-number-increment', 1 );
$dialog->scan;		$dialog->scan;
}		}
);		);
$dialog->set( 'device-list', [ { 'name' => 'test' } ] );		$dialog->set( 'device-list', [ { 'name' => 'test' } ] );
$dialog->set( 'device', 'test' );		$dialog->set( 'device', 'test' );
}		}
);		);
$dialog->signal_connect(		$dialog->signal_connect(
'process-error' => sub {		'process-error' => sub {
my ( $widget, $process, $msg ) = @_;		my ( $widget, $process, $msg ) = @_;
ok 0, 'error-free scan despite illegal option';		ok 0, 'error-free scan despite illegal option';
Gtk3->main_quit;		Gtk3->main_quit;
}		}
);		);
$dialog->set( 'num-pages', 1 );		$dialog->set( 'num-pages', 1 );
$dialog->set( 'page-number-increment', 1 );		$dialog->set( 'page-number-increment', 1 );
$dialog->scan;		$dialog->scan;
}		}
);		);
$dialog->set( 'device-list', [ { 'name' => 'test' } ] );		$dialog->set( 'device-list', [ { 'name' => 'test' } ] );
$dialog->set( 'device', 'test' );		$dialog->set( 'device', 'test' );
#########################		#########################
Gtk3->main;		Gtk3->main;
__END__		__END__
End of changes. 2 change blocks.
2 lines changed or deleted		2 lines changed or added

---