SVN Commit by andreas: r4838 - trunk/pgadmin3/src/schema - Mailing list pgadmin-hackers

Author: andreas
Date: 2005-12-11 22:22:49 +0000 (Sun, 11 Dec 2005)
New Revision: 4838

Modified:
   trunk/pgadmin3/src/schema/pgLanguage.cpp
Log:
show language validator in language reverse engineering

Modified: trunk/pgadmin3/src/schema/pgLanguage.cpp
===================================================================
--- trunk/pgadmin3/src/schema/pgLanguage.cpp    2005-12-11 22:22:30 UTC (rev 4837)
+++ trunk/pgadmin3/src/schema/pgLanguage.cpp    2005-12-11 22:22:49 UTC (rev 4838)
@@ -37,6 +37,7 @@
     return GetDatabase()->ExecuteVoid(sql);
 }

+
 wxString pgLanguage::GetSql(ctlTree *browser)
 {
     if (sql.IsNull())
@@ -47,13 +48,19 @@
         if (GetTrusted())
             sql += wxT("TRUSTED ");
         sql += wxT("PROCEDURAL LANGUAGE '") + GetName()
-            +  wxT("'\n  HANDLER ") + GetHandlerProc() + wxT(";\n")
+            +  wxT("'\n  HANDLER ") + GetHandlerProc();
+
+        if (!GetValidatorProc().IsEmpty())
+            sql += wxT("\n  VALIDATOR ") + GetValidatorProc();
+
+        sql += wxT(";\n")
             +  GetGrant(wxT("X"), wxT("LANGUAGE ") + GetQuotedFullIdentifier());

     }
     return sql;
 }

+
 void pgLanguage::ShowTreeDetail(ctlTree *browser, frmMain *form, ctlListView *properties, ctlSQLBox *sqlPane)
 {
     if (properties)