Bio::Graphics::Glyph group
SummaryIncluded librariesPackage variablesSynopsisDescriptionGeneral documentationMethods
Toolbar
WebCvsRaw content
Summary
Bio::Graphics::Glyph::group - The "group" glyph
Package variables
No package variables defined.
Included modules
Bio::Graphics::Glyph::segmented_keyglyph
Inherit
Bio::Graphics::Glyph::segmented_keyglyph
Synopsis
  See Bio::Graphics::Panel and Bio::Graphics::Glyph.
Description
This glyph is used internally by Bio::Graphics::Panel for laying out
groups of glyphs that move in concert. It should not be used
explicitly.
Methods
bump
No description
Code
connector
No description
Code
new
No description
Code
Methods description
None available.
Methods code
bumpdescriptionprevnextTop
sub bump {
  my $bump = shift->SUPER::bump(@_);
  return unless defined $bump;
  return 1  if $bump >  1;
  return -1 if $bump < -1;
  return $bump;
}

1;

__END__
}
connectordescriptionprevnextTop
sub connector {
  my $self = shift;
  my $super = $self->SUPER::connector(@_);
  return $super if $self->all_callbacks;
  return 'dashed' unless defined($super) && ($super eq 'none' or !$super);
}

# we don't label group (yet)
}
newdescriptionprevnextTop
sub new {
  my $self = shift->SUPER::new(@_);
  # reset our parts to level zero
foreach (@{$self->{parts}}) { $_->{level} = 0; } $self; } # don't allow simple bumping in groups -- it looks terrible...
}
General documentation
BUGSTop
Please report them.
SEE ALSOTop
Ace::Sequence, Ace::Sequence::Feature, Bio::Graphics::Panel,
Bio::Graphics::Track, Bio::Graphics::Glyph::anchored_arrow,
Bio::Graphics::Glyph::arrow,
Bio::Graphics::Glyph::box,
Bio::Graphics::Glyph::primers,
Bio::Graphics::Glyph::segments,
Bio::Graphics::Glyph::toomany,
Bio::Graphics::Glyph::transcript,
AUTHORTop
Lincoln Stein <lstein@cshl.org>
Copyright (c) 2001 Cold Spring Harbor Laboratory
This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself. See DISCLAIMER.txt for
disclaimers of warranty.