From 7fc24d4453d01193d94bcd2b32313e1d4badb550 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Thu, 10 Sep 2009 16:44:58 +0100
Subject: [PATCH] Do not crash if --upload-yarrg is specified but not
 --upload-pctb

---
 yarrg/database-info-fetch | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/yarrg/database-info-fetch b/yarrg/database-info-fetch
index 5e05760..0757726 100755
--- a/yarrg/database-info-fetch
+++ b/yarrg/database-info-fetch
@@ -168,7 +168,7 @@ sub main__island () {
     my $ocean= get_ocean();
     
     parse_info_clientside();
-    get_arches_islands_pctb($ocean);
+    get_arches_islands_pctb($ocean) if $pctb;
 
     for_islands($ocean,
 		sub {
-- 
2.30.2