diff options
| author | fukachan <fukachan> | 2001-11-27 15:25:22 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-11-27 15:25:22 +0000 |
| commit | 59054ea3bd4d1b348132e105b7891d0b989a63db (patch) | |
| tree | d0d33959388c9c47aff51d83b6cd8a367de964ba /fml/lib/Mail/Message | |
| parent | ff1239e1c3fe43d4abe61d088542312e9b196b50 (diff) | |
| download | fml8-59054ea3bd4d1b348132e105b7891d0b989a63db.tar.gz fml8-59054ea3bd4d1b348132e105b7891d0b989a63db.tar.bz2 fml8-59054ea3bd4d1b348132e105b7891d0b989a63db.zip | |
remove MTI.. message
Diffstat (limited to 'fml/lib/Mail/Message')
| -rw-r--r-- | fml/lib/Mail/Message/Date.pm | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/fml/lib/Mail/Message/Date.pm b/fml/lib/Mail/Message/Date.pm index 9c1f4598..7c2eb3aa 100644 --- a/fml/lib/Mail/Message/Date.pm +++ b/fml/lib/Mail/Message/Date.pm @@ -2,7 +2,7 @@ # # Copyright (C) 2000 Ken'ichi Fukamachi # -# $FML: Date.pm,v 1.1 2001/11/03 08:03:30 fukachan Exp $ +# $FML: Date.pm,v 1.2 2001/11/09 15:03:20 fukachan Exp $ # package Mail::Message::Date; @@ -334,16 +334,17 @@ sub date_to_unixtime return $1; } elsif ($debug_mti) { - my (@caller) = caller; - _log("MTI[$$]::Date2UnixTime: invalid [$input]"); - _log("MIT[$$]: callded from @caller"); + my ($package,$filename,$line) = caller; + _log("date_to_unixtime: invalid [$input]"); + _log("date_to_unixtime: callded from @caller"); } } else { if ($debug_mti) { - my (@caller) = caller; - _log("MTI[$$]::Date2UnixTime: invalid [$input]"); - _log("MIT[$$]: callded from @caller"); + my ($package,$filename,$line) = caller; + my ($package,$filename,$line) = caller; + _log("date_to_unixtime: invalid [$input]"); + _log("date_to_unixtime: callded from @caller"); } return 0; } |