From 49277804ea76478ba182a18c36d6e646ad65bed3 Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@thenautilus.net>
Date: Tue, 18 Aug 2009 15:07:32 +0200
Subject: warn if no atom id

---
 lib/WebCoso/Common.pm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/lib/WebCoso/Common.pm b/lib/WebCoso/Common.pm
index 513a562..f8d64fa 100644
--- a/lib/WebCoso/Common.pm
+++ b/lib/WebCoso/Common.pm
@@ -131,9 +131,15 @@ sub getAtomIdFor {
         LOGWARN("No document for <$doc_name>, returning ''");
         return '';
     }
+
     my $atomId=$xpath->findnodes(
         q{/document/docinfo/field[field_name='Id']/field_body},
         $doc);
+    unless (defined $atomId) {
+        LOGWARN("No Id field for <$doc_name>, returning ''");
+        return '';
+    }
+
     $atomId=~s{(?:\A\s+)|(?:\s+\z)}{}smgx;
     return $atomId;
 }
-- 
cgit v1.2.3