Parent Directory | Revision Log | Patch
revision 15 by knops.gerd, Thu Dec 14 16:29:42 2006 UTC | revision 16 by knops.gerd, Tue May 1 16:59:28 2007 UTC | |
---|---|---|
# | Line 77 sub setText { | Line 77 sub setText { |
77 | $self->{'text'}=$text; | $self->{'text'}=$text; |
78 | } | } |
79 | ||
80 | sub channelName { | |
81 | shift->{'channel'}; | |
82 | } | |
83 | ||
84 | sub setChannelName { | |
85 | my $self=shift; | |
86 | my $channelName=shift || ''; | |
87 | ||
88 | $self->{'channel'}=$channelName; | |
89 | } | |
90 | ||
91 | sub text { | sub text { |
92 | shift->{'text'}; | shift->{'text'}; |
93 | } | } |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |