gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 13222 - Accessors for import_record.status have variable names suggesting overlay_status 

TODO:: Somebody who knows what these are about could write some documentation about it.

Signed-off-by: Jonathan Druart <jonathan.druart@biblibre.com>
Signed-off-by: Katrin Fischer <Katrin.Fischer.83@web.de>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
This commit is contained in:
Olli-Antti Kivilahti 2014-11-07 17:07:46 +02:00 committed by Tomas Cohen Arazi
parent 706e7a953e
commit fc4e9ab62e
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
C4/ImportBatch.pm
View File

@ -1328,7 +1328,7 @@ sub SetImportRecordOverlayStatus {
=head2 GetImportRecordStatus
my $overlay_status = GetImportRecordStatus($import_record_id);
my $status = GetImportRecordStatus($import_record_id);
=cut
@ -1338,25 +1338,25 @@ sub GetImportRecordStatus {
my $dbh = C4::Context->dbh;
my $sth = $dbh->prepare("SELECT status FROM import_records WHERE import_record_id = ?");
$sth->execute($import_record_id);
my ($overlay_status) = $sth->fetchrow_array();
my ($status) = $sth->fetchrow_array();
$sth->finish();
return $overlay_status;
return $status;
}
=head2 SetImportRecordStatus
SetImportRecordStatus($import_record_id, $new_overlay_status);
SetImportRecordStatus($import_record_id, $new_status);
=cut
sub SetImportRecordStatus {
my ($import_record_id, $new_overlay_status) = @_;
my ($import_record_id, $new_status) = @_;
my $dbh = C4::Context->dbh;
my $sth = $dbh->prepare("UPDATE import_records SET status = ? WHERE import_record_id = ?");
$sth->execute($new_overlay_status, $import_record_id);
$sth->execute($new_status, $import_record_id);
$sth->finish();
}