bunches o syntax fixes.
This commit is contained in:
parent
742e63e389
commit
19bce8eaf6
14 changed files with 24 additions and 24 deletions
|
|
@ -1105,7 +1105,7 @@ sub www_unsubscribe {
|
|||
my @_months = qw(Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec);
|
||||
sub _get_rfc822_date {
|
||||
my ($time) = @_;
|
||||
my ($year, $mon, $mday, $hour, $min, $sec) = $self->session->datetime->loca$self->session->datetime->time($time);
|
||||
my ($year, $mon, $mday, $hour, $min, $sec) = $self->session->datetime->localtime($time);
|
||||
my $month = $_months[$mon - 1];
|
||||
return sprintf("%02d %s %04d %02d:%02d:%02d GMT",
|
||||
$mday, $month, $year, $hour, $min, $sec);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue