← Back to branch summary

~ubuntu-branches/ubuntu/precise/bioperl/precise

« back to all changes in this revision

Viewing changes to t/SeqIO/asciitree.t

  • Committer: Bazaar Package Importer
  • Author(s): Ilya Barygin
  • Date: 2010-01-27 22:48:22 UTC
  • mfrom: (3.1.4 squeeze)
  • Revision ID: james.westby@ubuntu.com-20100127224822-ebot4qbrjxcv38au
Tags: 1.6.1-1ubuntu1
* Merge from Debian testing, remaining changes:
  - disable tests, they produce a FTBFS trying to access the network 
    during run.

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/SeqIO/asciitree.t
1
1
# -*-Perl-*- Test Harness script for Bioperl
2
 
# $Id: asciitree.t 15407 2009-01-20 05:18:29Z cjfields $
 
2
# $Id: asciitree.t 16168 2009-09-25 21:07:32Z cjfields $
3
3
 
4
4
# `make test'. After `make install' it should work as `perl test.t'
5
5
 
27
27
                                                -verbose => $verbose,
28
28
                                                -format => 'asciitree');
29
29
$out->write_seq($seq);
30
 
ok (-s $out_file);
 
30
 
 
31
# this is a bug and is failing on some systems like IRIX (not sure why, maybe
 
32
# File::Temp?)
 
33
 
 
34
if (-s $out_file) {
 
35
        ok(1, "File exists, has contents on ".$^O);
 
36
} else {
 
37
        TODO: {
 
38
        local $TODO = "Output doesn't exists on ".$^O;
 
39
                ok(-s $out_file);
 
40
        }
 
41
}