From f77c6a9fa73d85887be894baca0e7efa1aa23ce9 Mon Sep 17 00:00:00 2001
From: Duncan Ferguson <duncan_j_ferguson@yahoo.co.uk>
Date: Fri, 18 Jun 2010 23:10:36 +0100
Subject: [PATCH] Squash 'Use of uninitialized value' errors

Go through passed array and set anything false to an empty string to clean up test output
---
 lib/App/ClusterSSH/Base.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/App/ClusterSSH/Base.pm b/lib/App/ClusterSSH/Base.pm
index c605004..6b63983 100644
--- a/lib/App/ClusterSSH/Base.pm
+++ b/lib/App/ClusterSSH/Base.pm
@@ -63,6 +63,7 @@ sub _translate {
 
 sub loc {
     my ( $self, @args ) = @_;
+    $_ ||= q{} foreach (@args);
     return _translate(@args);
 }