Index: trunk/tools/czartool/CzarDb.pm
===================================================================
--- trunk/tools/czartool/CzarDb.pm	(revision 28704)
+++ trunk/tools/czartool/CzarDb.pm	(revision 28715)
@@ -34,5 +34,5 @@
 ###########################################################################
 sub getCurrentLabels {
-    my ($self, $server) = @_;
+    my ($self, $server, $labels) = @_;
 
     my $query = $self->{_db}->prepare(<<SQL);
@@ -43,7 +43,14 @@
 SQL
 
-    $query->execute;
-
-    return $query->fetchall_arrayref();
+
+    if (!$query->execute) {
+
+        print "WARNING: getCurrentLabels() failed\n";
+        return 0;
+    }
+
+    ${$labels} = $query->fetchall_arrayref();
+
+    return 1;
 }