Parent Directory | Revision Log | Patch
revision 1.6 by wakaba, Sun Jun 9 11:08:28 2002 UTC | revision 1.7 by wakaba, Sat Jun 15 07:15:59 2002 UTC | |
---|---|---|
# | Line 223 sub content ($) { | Line 223 sub content ($) { |
223 | my ($l, $r) = ($self->id_left, $self->id_right); | my ($l, $r) = ($self->id_left, $self->id_right); |
224 | sprintf '%s@%s', $l, $r if $l && $r; | sprintf '%s@%s', $l, $r if $l && $r; |
225 | } | } |
226 | *id = \&content; | |
227 | ||
228 | sub stringify ($;%) { | sub stringify ($;%) { |
229 | my $self = shift; | my $self = shift; |
|
admin@suikawiki.org | ViewVC Help |
Powered by ViewVC 1.1.24 |