From a87303e9082c5f4d6f9d380be3fe6eabb07fc8c0 Mon Sep 17 00:00:00 2001
From: Simon Josefsson <simon@josefsson.org>
Date: Fri, 2 Mar 2007 11:56:25 +0100
Subject: [PATCH] Warn on (some) errors.

---
 git2cl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)
 mode change 100755 => 100644 git2cl

diff --git a/git2cl b/git2cl
old mode 100755
new mode 100644
index b1081a0..aa204f5
--- a/git2cl
+++ b/git2cl
@@ -257,7 +257,9 @@ while (<>) {
 	$done = 1 if (m,^$,);
     }
 
-    if ($done) {
+    if ($done && @date == ()) {
+	print STDERR "warning: could not parse entry\n";
+    } elsif ($done) {
 	print (strftime "%Y-%m-%d  $author\n\n", @date);
 
 	my $files = join (", ", @files);
-- 
2.11.4.GIT