,undef,$c->req->param('info'),$call->{id});
$log->execute($c->user->id,$call->{ftid},"Updated info");
}
+ if ($c->req->param('ccalc')){
+ my $calc = $c->req->param('calc');
+ $dbh->do(q{UPDATE calls SET calc = ? WHERE id = ?}
+ ,undef,$calc,$call->{id});
+ $log->execute($c->user->id,$call->{ftid},html_escape "Updated calc to: [URL] $calc [/URL]");
+ }
}elsif($c->req->param('cmd') =~ /^(Cover|Uncover|Ignore|Open|Take) call$/){
my $extra_vars = '';
if ($1 eq 'Cover'){
my $query = $dbh->prepare(q{
SELECT c.id, coords(p.x,p.y,p.z), c.landing_tick, c.info, covered
,open, dc.username AS dc, u.defense_points,c.member AS uid
- ,u.planet, u.username AS member, u.sms,c.ftid
+ ,u.planet, u.username AS member, u.sms,c.ftid,calc
FROM calls c
JOIN users u ON c.member = u.uid
LEFT OUTER JOIN users dc ON c.dc = dc.uid
</ul>
</td>
<td>
- <textarea rows="8" cols="40" name="info">[% call.info %]</textarea>
+ <textarea rows="8" cols="40" name="info">[% call.info | html %]</textarea>
</td>
<td><ul>
+ <li>Calc: <input type="text" name="calc" value="[% call.calc | html %]">
+ <input type="checkbox" name="ccalc"></li>
<li>Change Notes? <input type="checkbox" name="cinfo"></li>
<li><input type="submit" name="cmd" value="Submit"></li>
<li><input type="submit" name="cmd" value="Take call"></li>