Parent Directory | Revision Log | Patch
revision 1.8 by fheinz, Mon Apr 14 19:38:27 2003 UTC | revision 1.9 by jlenton, Mon Apr 14 22:31:39 2003 UTC | |
---|---|---|
# | Line 162 sub code | Line 162 sub code |
162 | return $self->code_start . $self->code_middle . $self->code_end; | return $self->code_start . $self->code_middle . $self->code_end; |
163 | } | } |
164 | ||
# Returns a list of the topmost level of children | ||
# than are screen objects. | ||
# Since this is a not screen object, look among our children. | ||
sub screen_children | ||
{ | ||
my $self = shift; | ||
return map {$_->screen_children} self->content; | ||
} | ||
165 | 1; | 1; |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |