← Back to branch summary

~ubuntu-branches/ubuntu/karmic/libimage-exiftool-perl/karmic

« back to all changes in this revision

Viewing changes to t/Jpeg2000.t

  • Committer: Bazaar Package Importer
  • Author(s): Mari Wang
  • Date: 2008-02-04 20:32:53 UTC
  • mfrom: (1.1.5 upstream)
  • Revision ID: james.westby@ubuntu.com-20080204203253-mpbal8trlfe1fz5d
Tags: 7.00-1
http://bugs.debian.org/456430
http://bugs.debian.org/435589
http://bugs.debian.org/436100
* Upload of new production release (Closes: #456430)
* Added Recommends: libcompress-zlib-perl (Closes: #435589)
* Package now includes iptc2xmp.args and xmp2iptc.args, they are put
  into /usr/share/libimage-exiftool/ (Closes: #436100)
* Updated standards-version (3.7.2 -> 3.7.3). No changes needed.
* Lots of updates and bugfixes compared to last debian version
  (6.90).  See the Changes file for details
* Upload sponsored by Petter Reinholdtsen

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/Jpeg2000.t
5
5
 
6
6
# Change "1..N" below to so that N matches last test number
7
7
 
8
 
BEGIN { $| = 1; print "1..2\n"; $Image::ExifTool::noConfig = 1; }
 
8
BEGIN { $| = 1; print "1..3\n"; $Image::ExifTool::noConfig = 1; }
9
9
END {print "not ok 1\n" unless $loaded;}
10
10
 
11
11
# test 1: Load ExifTool
30
30
    print "ok $testnum\n";
31
31
}
32
32
 
 
33
# test 3: Write some new information
 
34
{
 
35
    ++$testnum;
 
36
    my @writeInfo = (
 
37
        ['IPTC:Keywords' => 'test keyword'],
 
38
        ['XMP:City' => 'a city'],
 
39
        ['EXIF:ImageDescription' => 'a description'],
 
40
    );
 
41
    print 'not ' unless writeCheck(\@writeInfo, $testname, $testnum, 't/images/Jpeg2000.jp2');
 
42
    print "ok $testnum\n";
 
43
}
 
44
 
33
45
 
34
46
# end