my $date = RT::Date->new( $session{CurrentUser} );
$date->Set( Format=>'unix', Value=>$starts, );
my($srv, $smsg) = $ticket->SetStarts( $date->ISO );
- $srv = 1 if ! $srv && /already the current value/i;
+ $srv = 1 if ! $srv && $smsg =~ /already the current value/i;
my $ddate;
unless ( ! $srv ) {
'sched_label' =>
FS::sched_avail::pretty_time($sh*60+$sm). '-'.
FS::sched_avail::pretty_time($eh*60+$em). ': '.
- $cust_main[0]->_FreesideURILabel,
+ encode_entities($cust_main[0]->_FreesideURILabel),
};
} else {
$return = { 'error' => $smsg };