Allow comments to be edited on EDB stored procedures.

git-svn-id: svn://svn.pgadmin.org/trunk/pgadmin3@7328 a7884b65-44f6-0310-8a51-81a127f17b15

diff --git a/CHANGELOG b/CHANGELOG
index 686c694a254bc19123801338867d0e142bd99a87..2ac6165ff5d881831b1e3e892a3b3f8051ef616c 100644 (file)
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -36,6 +36,7 @@ Changes
 \r
 Date       Dev Ver    Change details\r
 ---------- --- -----  --------------\r
+2008-05-30 DP  1.8.3  Allow comments to be edited on EDB stored procedures.\r
 2008-05-29 DP  1.8.3  Fix comments on EDB packages.\r
 2008-05-29 DP  1.8.3  Ensure the grant wizard works correctly with EDB stored\r
                       procedures.\r

diff --git a/pgadmin/dlg/dlgFunction.cpp b/pgadmin/dlg/dlgFunction.cpp
index 3d8b650c5cb03a32e84933d08d305a75b465581a..9b1d9c9edaf28426ca6f3b11faa6f9ba871527e1 100644 (file)
--- a/pgadmin/dlg/dlgFunction.cpp
+++ b/pgadmin/dlg/dlgFunction.cpp
@@ -182,7 +182,6 @@ int dlgFunction::Go(bool modal)
         if (function)
             txtName->Disable();
         cbOwner->Disable();
-        txtComment->Disable();
         cbLanguage->Disable();
         chkStrict->Disable();
         chkSecureDefiner->Disable();
@@ -865,7 +864,10 @@ wxString dlgFunction::GetSql()
         sql += GetGrant(wxT("X"), wxT("FUNCTION ") + name);
     }
 
-    AppendComment(sql, wxT("FUNCTION ") + name, function);
+       if (isProcedure)
+        AppendComment(sql, wxT("PROCEDURE ") + GetName(), function);
+       else
+        AppendComment(sql, wxT("FUNCTION ") + name, function);
 
     return sql;
 }