we no longer use position; stop breaking relationship adding

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

diff --git a/lib/Text/Tradition/Collation/Relationship.pm b/lib/Text/Tradition/Collation/Relationship.pm
index 4efab5e..c2ad3ae 100644 (file)
--- a/lib/Text/Tradition/Collation/Relationship.pm
+++ b/lib/Text/Tradition/Collation/Relationship.pm
@@ -59,6 +59,11 @@ has 'non_independent' => (
     is => 'rw',
     isa => 'Bool',
     );
+    
+has 'equal_rank' => (
+    is => 'rw',
+    isa => 'Bool',
+    );
 
 sub FOREIGNBUILDARGS {
     my $class = shift;
@@ -77,11 +82,6 @@ sub BUILD {
 
     $self->set_attribute( 'class', 'relationship' );
 
-    my( $source, $target ) = @{$self->this_relation};
-    if( $source->has_position && $target->has_position ) {
-       # Harmonize the positions.
-       $source->match_position( $target );
-    }
     unless( $self->primary_relation ) {
        $self->primary_relation( [ $self->this_relation->[0]->label,
                                   $self->this_relation->[1]->label ] );