Parent Directory | Revision Log | Patch
revision 13 by ulpfr, Fri Apr 28 15:42:44 2000 UTC | revision 19 by ulpfr, Tue May 9 11:29:45 2000 UTC | |
---|---|---|
# | Line 102 sub delete { | Line 102 sub delete { |
102 | ||
103 | defined $self->{db} or $self->open; | defined $self->{db} or $self->open; |
104 | ||
105 | my $tuple = join($;, map($parm{$_}, @{$self->{attr}})); | my $tuple = join($;, map($parm{$_}||"", @{$self->{attr}})); |
106 | ||
107 | delete $self->{db}->{$tuple}; | delete $self->{db}->{$tuple}; |
108 | } | } |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |