From 5c09bbfce89505b4a6d2bc5cb2ec1254b24d2577 Mon Sep 17 00:00:00 2001
From: Yung Han Khoe <yung@webgui-svn>
Date: Fri, 23 Feb 2007 16:32:24 +0000
Subject: [PATCH] SQLForm: processing of Macro's in default value didn't work.

---
 lib/WebGUI/Asset/Wobject/SQLForm.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/WebGUI/Asset/Wobject/SQLForm.pm b/lib/WebGUI/Asset/Wobject/SQLForm.pm
index 72312c59b..fa4522a46 100644
--- a/lib/WebGUI/Asset/Wobject/SQLForm.pm
+++ b/lib/WebGUI/Asset/Wobject/SQLForm.pm
@@ -741,7 +741,8 @@ my		$sth = $dbLink->db->unconditionalRead($definition{sqlQuery}." order by ".$de
 	}
 
 	$properties->{options} = $options;
-	$properties->{processedDefaultValue} = WebGUI::Macro::process($self->session, $definition{defaultValue});
+	$properties->{processedDefaultValue} = $definition{defaultValue};
+        WebGUI::Macro::process($self->session,\$properties->{processedDefaultValue});
 	$properties->{fieldId} = $fieldId;
 
 	$self->{_fieldPropertiesCache}->{$fieldId} = {%definition, %$properties};