Parent Directory | Revision Log | Patch
revision 1.7 by jlenton, Thu Apr 10 23:01:39 2003 UTC | revision 1.8 by fheinz, Mon Apr 14 19:38:27 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 | ||
165 | # Returns a list of the topmost level of children | |
166 | # than are screen objects. | |
167 | # Since this is a not screen object, look among our children. | |
168 | sub screen_children | |
169 | { | |
170 | my $self = shift; | |
171 | ||
172 | return map {$_->screen_children} self->content; | |
173 | } | |
174 | ||
175 | 1; | 1; |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |