diff options
| author | tmu <tmu> | 2009-06-10 00:50:31 +0000 |
|---|---|---|
| committer | tmu <tmu> | 2009-06-10 00:50:31 +0000 |
| commit | 02a16b2d331cd0944c044602c1b80db378cdbc0e (patch) | |
| tree | 789c3ec7cd865dd6c2f33a77136f94b8e6c24014 | |
| parent | 886ff9607812572ff4cc7878efb3cb6d96bedbf2 (diff) | |
| download | fml8-02a16b2d331cd0944c044602c1b80db378cdbc0e.tar.gz fml8-02a16b2d331cd0944c044602c1b80db378cdbc0e.tar.bz2 fml8-02a16b2d331cd0944c044602c1b80db378cdbc0e.zip | |
bugfix case timezone +0000
| -rw-r--r-- | fml/lib/Mail/Message/Date.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/fml/lib/Mail/Message/Date.pm b/fml/lib/Mail/Message/Date.pm index 8e9c84c2..0ba8fb62 100644 --- a/fml/lib/Mail/Message/Date.pm +++ b/fml/lib/Mail/Message/Date.pm @@ -2,7 +2,7 @@ # # Copyright (C) 2000,2001,2002,2003,2004,2005 Ken'ichi Fukamachi # -# $FML: Date.pm,v 1.28 2004/07/23 13:10:42 fukachan Exp $ +# $FML: Date.pm,v 1.29 2005/05/27 03:03:42 fukachan Exp $ # package Mail::Message::Date; @@ -534,6 +534,7 @@ sub date_to_unixtime # calculate shift between local time and UTC $shift_t =~ s/^0*//o; $shift_m =~ s/^0*//o; + $shift_t = 0 unless $shift_t; $shift_m = 0 unless $shift_m; $shift = $shift_t + ($shift_m/60); $shift = ($pm eq '+' ? -1 : +1) * $shift; |