Author: spadkins
Date: Tue Jan 16 09:28:01 2007
New Revision: 8594
Modified:
p5ee/trunk/App-Repository/lib/App/ValueDomain/Repository.pm
Log:
Check for empty string, wvalue
Modified: p5ee/trunk/App-Repository/lib/App/ValueDomain/Repository.pm
==============================================================================
--- p5ee/trunk/App-Repository/lib/App/ValueDomain/Repository.pm (original)
+++ p5ee/trunk/App-Repository/lib/App/ValueDomain/Repository.pm Tue Jan 16
09:28:01 2007
@@ -187,7 +187,7 @@
while ($sql =~ /\{([A-Za-z0-9\._-]+)\}/g) {
$wname = $1;
$wvalue = $context->so_get($wname);
- if (defined $wvalue) {
+ if (defined $wvalue && $wvalue ne "") {
$sql =~ s/\{$wname\}/$wvalue/g;
}
else {
