From 9d4eda4f9aa35d5ecf562e36fd49126f4ed0264c Mon Sep 17 00:00:00 2001 From: "kestes%walrus.com" Date: Tue, 10 Dec 2002 19:28:48 +0000 Subject: [PATCH] fix to quiet new perl warnings about using undefined value. --- webtools/tinderbox2/src/default_conf/BuildStatus.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/webtools/tinderbox2/src/default_conf/BuildStatus.pm b/webtools/tinderbox2/src/default_conf/BuildStatus.pm index 66a01189896e..f6ca63b6f5d3 100644 --- a/webtools/tinderbox2/src/default_conf/BuildStatus.pm +++ b/webtools/tinderbox2/src/default_conf/BuildStatus.pm @@ -1,8 +1,8 @@ # -*- Mode: perl; indent-tabs-mode: nil -*- -# $Revision: 1.22 $ -# $Date: 2002/05/09 03:09:52 $ +# $Revision: 1.23 $ +# $Date: 2002/12/10 19:28:48 $ # $Author: kestes%walrus.com $ # $Source: /home/hwine/cvs_conversion/cvsroot/mozilla/webtools/tinderbox2/src/default_conf/BuildStatus.pm,v $ # $Name: $ @@ -343,7 +343,7 @@ sub status2header_background_gif { for ($i=0; $i <= $#latest_status; $i++) { my ($status) = $latest_status[$i]; - my ($out) = $STATUS{$status}{'header_background_gif'}; + my ($out) = $STATUS{$status}{'header_background_gif'} || ''; push @out, $out; }