$DBH->begin_work;
if (param('crelationship')){
my $value = escapeHTML(param('relationship'));
if ($DBH->do(q{UPDATE alliances SET relationship = ? WHERE id =?}
,undef,$value,$alliance->{id})){
$alliance->{relationship} = $value;
$DBH->begin_work;
if (param('crelationship')){
my $value = escapeHTML(param('relationship'));
if ($DBH->do(q{UPDATE alliances SET relationship = ? WHERE id =?}
,undef,$value,$alliance->{id})){
$alliance->{relationship} = $value;