From df8316d4d198d518db6b03600273efd5f9948c4a Mon Sep 17 00:00:00 2001
From: Guilhem Moulin <guilhem@fripost.org>
Date: Fri, 24 Jul 2015 01:21:49 +0200
Subject: [PATCH] wibble

---
 imapsync             | 6 +++---
 lib/Net/IMAP/Sync.pm | 3 +--
 2 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/imapsync b/imapsync
index a8c786c..a759250 100755
--- a/imapsync
+++ b/imapsync
@@ -530,13 +530,13 @@ my $STH_GET_CACHE_BY_IDX = $DBH->prepare(q{
 my $STH_GET_INDEX = $DBH->prepare(q{SELECT idx FROM mailboxes WHERE mailbox = ?});
 
 # Find local/remote UID from the map.
-my $STH_GET_LOCAL_UID  = $DBH->prepare("SELECT lUID FROM mapping WHERE idx = ? and rUID = ?");
-my $STH_GET_REMOTE_UID = $DBH->prepare("SELECT rUID FROM mapping WHERE idx = ? and lUID = ?");
+my $STH_GET_LOCAL_UID  = $DBH->prepare(q{SELECT lUID FROM mapping WHERE idx = ? and rUID = ?});
+my $STH_GET_REMOTE_UID = $DBH->prepare(q{SELECT rUID FROM mapping WHERE idx = ? and lUID = ?});
 
 # Delete a (idx,lUID,rUID) association.
 # /!\ Don't commit before the messages have actually been EXPUNGEd on
 #     both sides!
-my $STH_DELETE_MAPPING = $DBH->prepare("DELETE FROM mapping WHERE idx = ? and lUID = ?");
+my $STH_DELETE_MAPPING = $DBH->prepare(q{DELETE FROM mapping WHERE idx = ? and lUID = ?});
 
 # Update the HIGHESTMODSEQ.
 my $STH_UPDATE_LOCAL_HIGHESTMODSEQ  = $DBH->prepare(q{UPDATE local  SET HIGHESTMODSEQ = ? WHERE idx = ?});
diff --git a/lib/Net/IMAP/Sync.pm b/lib/Net/IMAP/Sync.pm
index 21e2fa8..11bfba4 100644
--- a/lib/Net/IMAP/Sync.pm
+++ b/lib/Net/IMAP/Sync.pm
@@ -405,8 +405,7 @@ sub log($@) {
     $prefix .= " $self->{name}" if defined $self->{name};
     $prefix .= "($self->{_SELECTED})" if $self->{_STATE} eq 'SELECTED';
     $prefix .= ': ';
-    my $stderr = $self->{STDERR};
-    print $stderr $prefix, @_, "\n";
+    $self->{STDERR}->say($prefix, @_);
 }
 
 
-- 
2.39.2