- my $output = ' \Fee{'.UnixDate($date,'%A, %B %e, %H:%M').
- ' to '.UnixDate($date2,'%H:%M %Z')."\n".
+ my $output = ' \Fee{'.strftime('%A, %B %e, %H:%M',localtime(UnixDate($date,'%s'))).
+ ' to '.strftime('%H:%M %Z',localtime(UnixDate($date2,'%s')))."\n".