diff --git a/pgadmin/dlg/dlgFunction.cpp b/pgadmin/dlg/dlgFunction.cpp
index e018bb6..807b61e 100644
--- a/pgadmin/dlg/dlgFunction.cpp
+++ b/pgadmin/dlg/dlgFunction.cpp
@@ -984,7 +984,7 @@ wxString dlgFunction::GetSql()
 		AppendOwnerChange(sql, wxT("FUNCTION ") + name);
 		AppendSchemaChange(sql, wxT("FUNCTION ") + name);
 	}
-	else if(isProcedure)
+	else if (function && isProcedure)
 	{
 		name = schema->GetQuotedPrefix() + qtIdent(name);
 		AppendOwnerChange(sql, wxT("PROCEDURE ") + name);
