summaryrefslogtreecommitdiff
path: root/fml/lib
diff options
context:
space:
mode:
authorfukachan <fukachan>2006-03-21 12:58:13 +0000
committerfukachan <fukachan>2006-03-21 12:58:13 +0000
commit379db534241ae0ad830190e6458ebdd8aa263ebc (patch)
tree0aedea6880666889e098bc9022673d3bda1c6cbc /fml/lib
parent218d32b55200db8b668399563095e6564c28d7a5 (diff)
downloadfml8-379db534241ae0ad830190e6458ebdd8aa263ebc.tar.gz
fml8-379db534241ae0ad830190e6458ebdd8aa263ebc.tar.bz2
fml8-379db534241ae0ad830190e6458ebdd8aa263ebc.zip
fix type in queue_id generator
Diffstat (limited to 'fml/lib')
-rw-r--r--fml/lib/Mail/Delivery/Queue.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/fml/lib/Mail/Delivery/Queue.pm b/fml/lib/Mail/Delivery/Queue.pm
index 9493de7f..1c70fd89 100644
--- a/fml/lib/Mail/Delivery/Queue.pm
+++ b/fml/lib/Mail/Delivery/Queue.pm
@@ -4,7 +4,7 @@
# All rights reserved. This program is free software; you can
# redistribute it and/or modify it under the same terms as Perl itself.
#
-# $FML: Queue.pm,v 1.56 2006/01/09 14:00:55 fukachan Exp $
+# $FML: Queue.pm,v 1.57 2006/02/15 13:52:49 fukachan Exp $
#
package Mail::Delivery::Queue;
@@ -159,7 +159,7 @@ sub _new_queue_id
($seconds, $microseconds) = gettimeofday;
};
if ($@) {
- my ($second, $microseconds) = (time, 0);
+ my ($seconds, $microseconds) = (time, 0);
$id = sprintf("%d.%06d.%d.%d", $seconds, $microseconds, $$, $Counter);
}
else {