|
Lines 185-191
sub status_alias {
Link Here
|
| 185 |
# https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=20581#c156 |
185 |
# https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=20581#c156 |
| 186 |
# We need a way of accepting implied undef, so we can nullify |
186 |
# We need a way of accepting implied undef, so we can nullify |
| 187 |
# the status_alias column, when called from $self->status |
187 |
# the status_alias column, when called from $self->status |
| 188 |
my $val = $newval == -1 ? undef : $newval; |
188 |
my $val = $newval eq "-1" ? undef : $newval; |
| 189 |
my $newval = $self->SUPER::status_alias($newval); |
189 |
my $newval = $self->SUPER::status_alias($newval); |
| 190 |
if ($newval) { |
190 |
if ($newval) { |
| 191 |
return $newval; |
191 |
return $newval; |
|
Lines 225-231
sub status {
Link Here
|
| 225 |
# https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=20581#c156 |
225 |
# https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=20581#c156 |
| 226 |
# We need a way of passing implied undef to nullify status_alias |
226 |
# We need a way of passing implied undef to nullify status_alias |
| 227 |
# so we pass -1, which is special cased in the overloaded setter |
227 |
# so we pass -1, which is special cased in the overloaded setter |
| 228 |
$self->status_alias(-1); |
228 |
$self->status_alias("-1"); |
| 229 |
return $self->SUPER::status($newval); |
229 |
return $self->SUPER::status($newval); |
| 230 |
} |
230 |
} |
| 231 |
return $self->SUPER::status; |
231 |
return $self->SUPER::status; |
| 232 |
- |
|
|