/[papo]/papo/neb/neb/Tree/Tag.pm
ViewVC logotype

Diff of /papo/neb/neb/Tree/Tag.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch 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;

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26