From 4560c2324d978970871bfbe6a9480b17a915342f Mon Sep 17 00:00:00 2001 From: "cyeh%bluemartini.com" <> Date: Fri, 23 Feb 2001 02:11:22 +0000 Subject: fix for 66876: Using userids (mediumint) for initialowner and initialqacontact based on patch submitted by baulig@suse.de (Martin Baulig). --- describecomponents.cgi | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) (limited to 'describecomponents.cgi') diff --git a/describecomponents.cgi b/describecomponents.cgi index e1b646f51..4353af2fc 100755 --- a/describecomponents.cgi +++ b/describecomponents.cgi @@ -78,9 +78,15 @@ print ""; SendSQL("select value, initialowner, initialqacontact, description from components where program = " . SqlQuote($product) . " order by value"); +my @data; while (MoreSQLData()) { - my @row = FetchSQLData(); - my ($component, $initialowner, $initialqacontact, $description) = (@row); + push @data, [FetchSQLData()]; +} +foreach (@data) { + my ($component, $initialownerid, $initialqacontactid, $description) = @$_; + + my ($initialowner, $initialqacontact) = ($initialownerid ? DBID_to_name ($initialownerid) : '', + $initialqacontactid ? DBID_to_name ($initialqacontactid) : ''); print qq|