Parent Directory | Revision Log | Patch
revision 1.9 by jlenton, Mon Apr 14 22:31:39 2003 UTC | revision 1.10 by fheinz, Tue Apr 15 14:36:05 2003 UTC | |
---|---|---|
# | Line 61 sub attributes | Line 61 sub attributes |
61 | return %{$self->{ATTRS}}; | return %{$self->{ATTRS}}; |
62 | } | } |
63 | ||
64 | sub attribute_names | |
65 | { | |
66 | my $self = shift; | |
67 | ||
68 | return exists($self->{ATTRS}) ? keys %{$self->{ATTRS}} : (); | |
69 | } | |
70 | ||
71 | sub delete | sub delete |
72 | { | { |
73 | my $self = shift; | my $self = shift; |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |