|
Lines 39-45
This is the base class for SIP2 objects in the Koha library system.
Link Here
|
| 39 |
|
39 |
|
| 40 |
=head3 store |
40 |
=head3 store |
| 41 |
|
41 |
|
| 42 |
store |
42 |
store wrapper |
| 43 |
|
43 |
|
| 44 |
=cut |
44 |
=cut |
| 45 |
|
45 |
|
|
Lines 50-55
sub store {
Link Here
|
| 50 |
return $self->SUPER::store; |
50 |
return $self->SUPER::store; |
| 51 |
} |
51 |
} |
| 52 |
|
52 |
|
|
|
53 |
=head3 delete |
| 54 |
|
| 55 |
delete wrapper |
| 56 |
|
| 57 |
=cut |
| 58 |
|
| 53 |
sub delete { |
59 |
sub delete { |
| 54 |
my ($self) = @_; |
60 |
my ($self) = @_; |
| 55 |
|
61 |
|
|
Lines 57-62
sub delete {
Link Here
|
| 57 |
return $self->SUPER::delete; |
63 |
return $self->SUPER::delete; |
| 58 |
} |
64 |
} |
| 59 |
|
65 |
|
|
|
66 |
=head3 _update_config_timestamp |
| 67 |
|
| 68 |
Updates the sip2_resource_last_modified timestamp in cache |
| 69 |
|
| 70 |
=cut |
| 71 |
|
| 60 |
sub _update_config_timestamp { |
72 |
sub _update_config_timestamp { |
| 61 |
my $cache = Koha::Caches->get_instance(); |
73 |
my $cache = Koha::Caches->get_instance(); |
| 62 |
$cache->set_in_cache( 'sip2_resource_last_modified', dt_from_string()->epoch ); |
74 |
$cache->set_in_cache( 'sip2_resource_last_modified', dt_from_string()->epoch ); |