aboutsummaryrefslogtreecommitdiffstats
path: root/lib/MGA/Mirrors/DB.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/MGA/Mirrors/DB.pm')
-rw-r--r--lib/MGA/Mirrors/DB.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/MGA/Mirrors/DB.pm b/lib/MGA/Mirrors/DB.pm
index 16070dc..a7655b8 100644
--- a/lib/MGA/Mirrors/DB.pm
+++ b/lib/MGA/Mirrors/DB.pm
@@ -468,8 +468,10 @@ sub apply_change_request {
delete $res->{reqid};
$self->add_or_update_host($hostname, %{$res});
+ my $del = $self->db->prepare(q{delete from hosts_ch_req where reqid = ?});
+ $del->execute($reqid);
$self->db->commit;
- 1
+ $hostname
}
sub add_or_update_host {
@@ -478,7 +480,7 @@ sub add_or_update_host {
my (@fields, @vals);
while (my ($field, $val) = each(%info)) {
push(@fields, $field);
- push(@vals, $val || undef);
+ push(@vals, (defined($val) && $val ne '' ? $val : undef));
}
if (keys %info) {
my $upd = $self->db->prepare(sprintf(q{