From: Don Armstrong <don@donarmstrong.com>
Date: Mon, 15 Aug 2011 04:19:39 +0000 (+0000)
Subject:  * handle null response return
X-Git-Url: https://git.donarmstrong.com/?p=bin.git;a=commitdiff_plain;h=a9cb077d8636288dbf4a0ff8adb5237929d7a820

 * handle null response return
---

diff --git a/fb_upload b/fb_upload
index beac104..f46e87d 100755
--- a/fb_upload
+++ b/fb_upload
@@ -146,6 +146,9 @@ for my $photo (@photos) {
 				caption => '',
 				filename => basename($photo),
 			       );
+    if (not $response) {
+	die "Upload failure at photo $photo";
+    }
     print " to ".$response->{link}."\n";
 }