Parent Directory | Revision Log | Patch
revision 764 by dpavlin, Wed Oct 25 20:53:48 2006 UTC | revision 853 by dpavlin, Sun May 27 14:09:30 2007 UTC | |
---|---|---|
# | Line 229 sub save_ds { | Line 229 sub save_ds { |
229 | my $args = {@_}; | my $args = {@_}; |
230 | ||
231 | my $log = $self->_get_logger; | my $log = $self->_get_logger; |
232 | $log->debug("save_ds arguments:", dump( \@_ )); | $log->debug("save_ds arguments:", sub { dump( \@_ ) }); |
233 | ||
234 | foreach my $f (qw/id ds/) { | foreach my $f (qw/id ds/) { |
235 | $log->logconfess("need $f") unless (defined($args->{$f})); | $log->logconfess("need $f") unless (defined($args->{$f})); |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |