[Bioperl-guts-l] [14981] bioperl-live/trunk/Bio/Assembly/IO/ace.pm: [bug 2645]

[Christopher John Fields]

Revision: 14981
Author:   cjfields
Date:     2008-11-10 08:21:03 -0500 (Mon, 10 Nov 2008)

Log Message:
-----------
[bug 2645]
* return assembly only when assembly contains contigs
* noticing that singlet.t tests are failing

Modified Paths:
--------------
    bioperl-live/trunk/Bio/Assembly/IO/ace.pm

Modified: bioperl-live/trunk/Bio/Assembly/IO/ace.pm
===================================================================
--- bioperl-live/trunk/Bio/Assembly/IO/ace.pm	2008-11-04 19:10:08 UTC (rev 14980)
+++ bioperl-live/trunk/Bio/Assembly/IO/ace.pm	2008-11-10 13:21:03 UTC (rev 14981)
@@ -430,7 +430,7 @@
 
     $assembly->update_seq_list();
 
-    return $assembly;
+    $assembly->get_nof_contigs ? return $assembly : return;
 }
 
 =head2 write_assembly