projects
/
srvgit
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 3150: (QA follow-up) Don't load unused and deleted tt files
[srvgit]
/
Koha
/
Virtualshelves.pm
diff --git
a/Koha/Virtualshelves.pm
b/Koha/Virtualshelves.pm
index
d460588
..
2b82dfc
100644
(file)
--- a/
Koha/Virtualshelves.pm
+++ b/
Koha/Virtualshelves.pm
@@
-55,12
+55,12
@@
sub disown_or_delete {
if C4::Context->preference('ListOwnerDesignated')
and Koha::Patrons->find( C4::Context->preference('ListOwnerDesignated') );
if C4::Context->preference('ListOwnerDesignated')
and Koha::Patrons->find( C4::Context->preference('ListOwnerDesignated') );
-
unless ($new_owner
) {
+
if( !$new_owner && C4::Context->userenv
) {
$new_owner = C4::Context->userenv->{number};
}
while ( my $list = $self->next ) {
$new_owner = C4::Context->userenv->{number};
}
while ( my $list = $self->next ) {
- if ( $
list->is_public or $list->is_shared
) {
+ if ( $
new_owner && ( $list->is_public or $list->is_shared )
) {
$list->transfer_ownership($new_owner);
} else {
$list->delete;
$list->transfer_ownership($new_owner);
} else {
$list->delete;