From b590029675127fe23dd8d140b0989eb3f7d9a329 Mon Sep 17 00:00:00 2001
From: "Bradley M. Kuhn" <bkuhn@ebb.org>
Date: Sat, 30 Nov 2013 14:45:22 -0500
Subject: [PATCH] Print lines to standard output.

---
 calendar-import.plx | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/calendar-import.plx b/calendar-import.plx
index 190d3ea..65c0c8b 100755
--- a/calendar-import.plx
+++ b/calendar-import.plx
@@ -265,7 +265,7 @@ ELISP_END
   open(REAL_DIARY, '>>', $config->{proposedDiary})
     or DieLog("unable to append to config->{proposedDiary}: $!");
 
-  while (my $line = <NEW_DIARY>) { print REAL_DIARY $line; }
+  while (my $line = <NEW_DIARY>) { print $line; print REAL_DIARY $line; }
   close NEW_DIARY;  DieLog("error reading $newDiaryTempFile: $!") unless ($? == 0);
   close REAL_DIARY;  DieLog("error appending to $config->{proposedDiary}: $!") unless ($? == 0);