1# Before `make install' is performed this script should be runnable with
2# `make test'. After `make install' it should work as `perl ZBar.t'
3
4use warnings;
5use strict;
6use Test::More tests => 3;
7
8#########################
9
10BEGIN { use_ok('Barcode::ZBar') }
11
12#########################
13
14like(Barcode::ZBar::version(), qr<\d.\d>, 'version');
15
16#########################
17
18Barcode::ZBar::set_verbosity(16);
19Barcode::ZBar::increase_verbosity();
20pass('verbosity');
21
22#########################
23