diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt index e74dde606..13944c93a 100644 --- a/docs/changelog/7.x.x.txt +++ b/docs/changelog/7.x.x.txt @@ -7,6 +7,7 @@ they complete their transaction. - fix: Trouble with Search Users (perlDreamer Consulting, LLC) http://www.plainblack.com/bugs/tracker/trouble-with-search-users + - fix: Fixed a typo in SQLForm.pm (Radix) - fix: Fixed an unhandled exception in Workflow/Activity/PurgeOldAssetRevisions.pm - Added better error handling for asset instanciation in version tags. - Added better error handling in asset instanciation. diff --git a/lib/WebGUI/Asset/Wobject/SQLForm.pm b/lib/WebGUI/Asset/Wobject/SQLForm.pm index 5de233bde..57683c791 100644 --- a/lib/WebGUI/Asset/Wobject/SQLForm.pm +++ b/lib/WebGUI/Asset/Wobject/SQLForm.pm @@ -1245,7 +1245,7 @@ sub processPropertiesFromFormPost { #if table exists and not in SQLForm format, put in SQLFormFormat. @tables = $dbLink->db->buildArray("show tables"); - @usedTables = $self->session->db->buildArray("select tableName from SQLForm, asset where asset.assetID=SQLForm.assetId and state='pub lished' and databaseLinkId = ".$self->session->db->quote($dbLinkId)); + @usedTables = $self->session->db->buildArray("select tableName from SQLForm, asset where asset.assetID=SQLForm.assetId and state='published' and databaseLinkId = ".$self->session->db->quote($dbLinkId)); if (isIn(lc($tableName), map {lc} @usedTables)) { return ["The table is already used in an SQLForm."];