From 1619049c86326f0750e1def5716e57bc87af55f4 Mon Sep 17 00:00:00 2001
From: Brian O'Donnell <brian.odonnell@uvm.edu>
Date: Sun, 24 May 2015 21:43:49 -0400
Subject: [PATCH] Substitue link for guid if guid field is missing

---
 pod_feeder.pl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/pod_feeder.pl b/pod_feeder.pl
index 02169dc..788e18c 100755
--- a/pod_feeder.pl
+++ b/pod_feeder.pl
@@ -276,6 +276,9 @@ sub get_feed_items {
                 elsif( defined $item->{'id'} ){
                         $guid = $item->{'id'};
                 }
+		elsif( defined $item->{'link'} ){
+			$guid = $item->{'link'};
+		}
 
                 my $obj = {
                         guid            => $guid,