Parent Directory
| 
Revision Log
| 
Patch
| Revision 375 | Revision 376 | ||
|---|---|---|---|
| … | … | ||
| 17 | open_date | 17 | open_date |
| 18 | due_date | 18 | due_date |
| 19 | answer_date | 19 | answer_date |
| 20 | ); | 20 | ); |
| 21 | 21 | ||
| 22 | sub toString($) { | ||
| 23 | my $self = shift; | ||
| 24 | my $result; | ||
| 25 | foreach (@FIELDS) { | ||
| 26 | $result .= "$_ => "; | ||
| 27 | $result .= defined $self->$_() ? $self->$_() : ""; | ||
| 28 | $result .= "\n"; | ||
| 29 | } | ||
| 30 | return $result; | ||
| 31 | } | ||
| 32 | |||
| 22 | 1; | 33 | 1; |
|
||||||||
| aubreyja at gmail dot com | ViewVC Help |
| Powered by ViewVC 1.0.9 |