From 464b52b70171eeeded86a2ea0a455ce32a204315 Mon Sep 17 00:00:00 2001
From: Frank Dillon <frank@plainblack.com>
Date: Tue, 25 Apr 2006 16:17:01 +0000
Subject: [PATCH] Fix for issue where select lists were displaying default data
 rather than what was saved in the database.

---
 lib/WebGUI/Asset/Wobject/EventManagementSystem.pm | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
index 36b536c90..28e88c4e7 100644
--- a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
+++ b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
@@ -1721,10 +1721,17 @@ sub www_editEvent {
 		if($dataType eq "selectList" || $dataType eq "selectBox") {
 			$options = {"", $i18n3->get("Select")};
 		}
+		
+		my $val = $self->session->form->process("metadata_".$meta->{$field->{fieldId}}{fieldId},$dataType);
+		
+		if(!$val || (ref $val eq "ARRAY" && scalar(@{$val}) == 0 ) ) {
+		  $val = $meta->{$field->{fieldId}}{fieldData};
+		}
+		
 		$f->dynamicField(
 			name=>"metadata_".$meta->{$field->{fieldId}}{fieldId},
 			label=>$meta->{$field->{fieldId}}{label},
-			value=>($self->session->form->process("metadata_".$meta->{$field->{fieldId}}{fieldId},$dataType) || $meta->{$field->{fieldId}}{fieldData}),
+			value=>$val,
 			extras=>qq/title="$meta->{$field->{fieldId}}{label}"/,
 			possibleValues=>$meta->{$field->{fieldId}}{possibleValues},
 			options=>$options,