X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=ND%2FWeb%2FPages%2FAlliances.pm;h=706d3fcd9c6e3d430a8aa81e6cba684a3e3704b6;hb=103c3c2ed9ccd4f5ef95a1f8ea7f700a7a38e2cd;hp=48975c1ce95689eaa0889d084c9c2239b19880a4;hpb=c529d3c79dcc8b8d9242d0d4d074fabc8cbbe106;p=ndwebbie.git diff --git a/ND/Web/Pages/Alliances.pm b/ND/Web/Pages/Alliances.pm index 48975c1..706d3fc 100644 --- a/ND/Web/Pages/Alliances.pm +++ b/ND/Web/Pages/Alliances.pm @@ -46,7 +46,7 @@ sub render_body { $DBH->begin_work; if (param('crelationship')){ my $value = escapeHTML(param('relationship')); - if ($DBH->do(q{UPDATE alliances SET relationship = ? WHERE id =?} + if ($DBH->do(q{UPDATE alliances SET relationship = NULLIF(?,'') WHERE id =?} ,undef,$value,$alliance->{id})){ $alliance->{relationship} = $value; log_message $ND::UID,"HC set alliance: $alliance->{id} relationship: $value"; @@ -78,7 +78,7 @@ sub render_body { $BODY->param(Alliance => $alliance->{name}); $BODY->param(Id => $alliance->{id}); my @relationships; - for my $relationship (" ","Friendly", "NAP", "Hostile"){ + for my $relationship ("","Friendly", "NAP", "Hostile"){ push @relationships,{Rel => $relationship, Selected => defined $alliance->{relationship} && $relationship eq $alliance->{relationship}} } $BODY->param(Relationships => \@relationships);