Was choking if not using qacontact field.

1 files changed, 5 insertions, 0 deletions

diff --git a/doaddcomponent.cgi b/doaddcomponent.cgi
index c7856fff1..f6a967596 100755
--- a/doaddcomponent.cgi
+++ b/doaddcomponent.cgi
@@ -53,6 +53,11 @@ my $component = trim($::FORM{"component"});
 my $product = trim($::FORM{"product"});
 my $description = trim($::FORM{"description"});
 my $initialowner = trim($::FORM{"initialowner"});
+
+if (!defined $::FORM{"initialqacontact"}) {
+    # May not be defined if we're not using this field.
+    $::FORM{'initialqacontact'} = "";
+}
 my $initialqacontact = trim($::FORM{"initialqacontact"});
 
 if ($component eq "") {