From 820b497006a91eaa38de0d656ef2749238529ea1 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Pavel=20K=C3=A1cha?= <ph@cesnet.cz>
Date: Thu, 28 Nov 2013 11:07:28 +0100
Subject: [PATCH] Suppress undef warnings in example receiver (thanks to DanS)
---
src/warden-client/doc/example-receiver.pl.txt | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/warden-client/doc/example-receiver.pl.txt b/src/warden-client/doc/example-receiver.pl.txt
index 5507610..ecfefc2 100755
--- a/src/warden-client/doc/example-receiver.pl.txt
+++ b/src/warden-client/doc/example-receiver.pl.txt
@@ -38,7 +38,7 @@ print "+------------------------------------------------------------------------
while (my @new_events = WardenClientReceive::getNewEvents($warden_path, $requested_type)) {
foreach my $event_ref (@new_events) {
my @event = @$event_ref;
- print "| " . join(' | ', @event) . " |" . "\n";
+ print "| " . join(' | ', map { $_ || '' } @event) . " |" . "\n";
}
print "+------------------------------------------------------------------------------------------------------------------------------------------+\n";
}
--
GitLab