is => 'ro',
isa => 'Bool',
default => undef,
+ writer => '_set_join_prior',
);
has 'join_next' => (
is => 'ro',
isa => 'Bool',
default => undef,
+ writer => '_set_join_next',
);
return $self->is_start || $self->is_end || $self->is_lacuna || $self->is_ph;
}
-=head2 is_nonrel
-
-Similar to is_meta, but returns false for the start and end readings.
-
-=cut
-
-sub is_nonrel {
- my $self = shift;
- return $self->is_lacuna || $self->is_ph;
-}
-
=head1 Convenience methods
=head2 related_readings