3 |
# $Id$ |
# $Id$ |
4 |
# |
# |
5 |
# $Log$ |
# $Log$ |
6 |
|
# Revision 1.24 2002/12/22 14:13:01 joko |
7 |
|
# + sub dropDb |
8 |
|
# |
9 |
|
# Revision 1.23 2002/12/19 16:31:53 joko |
10 |
|
# +- renamed sub to 'rebuildDb' |
11 |
|
# |
12 |
# Revision 1.22 2002/12/18 22:28:16 jonen |
# Revision 1.22 2002/12/18 22:28:16 jonen |
13 |
# + added extended logging at 'getObjectByGuid()' |
# + added extended logging at 'getObjectByGuid()' |
14 |
# |
# |
371 |
return $ok; |
return $ok; |
372 |
} |
} |
373 |
|
|
374 |
sub rebuildDbAndSchema { |
sub rebuildDb { |
375 |
my $self = shift; |
my $self = shift; |
376 |
$logger->info( __PACKAGE__ . "->rebuildDbAndSchema()" ); |
$logger->info( __PACKAGE__ . "->rebuildDb()" ); |
377 |
my @results; |
my @results; |
378 |
|
|
379 |
# sum up results (bool (0/1)) in array |
# sum up results (bool (0/1)) in array |
648 |
return $self->{_COREHANDLE}; |
return $self->{_COREHANDLE}; |
649 |
} |
} |
650 |
|
|
651 |
|
sub dropDb { |
652 |
|
my $self = shift; |
653 |
|
my $storage = $self->_getSubLayerHandle(); |
654 |
|
return $storage->dropDb(); |
655 |
|
} |
656 |
|
|
657 |
1; |
1; |