aboutsummaryrefslogtreecommitdiffstats
path: root/lib/Net/IMAP
diff options
context:
space:
mode:
authorGuilhem Moulin <guilhem@fripost.org>2015-07-24 01:27:43 +0200
committerGuilhem Moulin <guilhem@fripost.org>2015-07-24 01:27:53 +0200
commita8445f6da256a09bac321a0bd2c23e3b8424caf4 (patch)
tree04c80cfd870b2a1672b2882d02bf5b062cfece82 /lib/Net/IMAP
parentdf8316d4d198d518db6b03600273efd5f9948c4a (diff)
Don't prefix logs by a timestamp, that's a syslog thing.
Diffstat (limited to 'lib/Net/IMAP')
-rw-r--r--lib/Net/IMAP/Sync.pm4
1 files changed, 1 insertions, 3 deletions
diff --git a/lib/Net/IMAP/Sync.pm b/lib/Net/IMAP/Sync.pm
index 11bfba4..bb99dcb 100644
--- a/lib/Net/IMAP/Sync.pm
+++ b/lib/Net/IMAP/Sync.pm
@@ -23,7 +23,6 @@ use strict;
use Config::Tiny ();
use List::Util 'first';
use Socket 'SO_KEEPALIVE';
-use POSIX 'strftime';
use Exporter 'import';
BEGIN {
@@ -401,8 +400,7 @@ sub DESTROY($) {
sub log($@) {
my $self = shift;
return unless @_;
- my $prefix = strftime "%b %e %H:%M:%S", localtime;
- $prefix .= " $self->{name}" if defined $self->{name};
+ my $prefix = defined $self->{name} ? $self->{name} : '';
$prefix .= "($self->{_SELECTED})" if $self->{_STATE} eq 'SELECTED';
$prefix .= ': ';
$self->{STDERR}->say($prefix, @_);