sort-of-fix some tests

[scpubgit/stemmatology.git] / lib / Text / Tradition / Collation.pm

diff --git a/lib/Text/Tradition/Collation.pm b/lib/Text/Tradition/Collation.pm
index 50903a2..3214cdc 100644 (file)
--- a/lib/Text/Tradition/Collation.pm
+++ b/lib/Text/Tradition/Collation.pm
@@ -316,9 +316,9 @@ sub related_readings {
        if( ref( $reading ) eq 'Text::Tradition::Collation::Reading' ) {
                $reading = $reading->id;
                $return_object = 1;
-               print STDERR "Returning related objects\n";
-       } else {
-               print STDERR "Returning related object names\n";
+#              print STDERR "Returning related objects\n";
+#      } else {
+#              print STDERR "Returning related object names\n";
        }
        my @related = $self->relations->all_reachable( $reading );
        if( $colocated ) {