diff --git a/lib/modules/Debug.pmod/Inspect.pike b/lib/modules/Debug.pmod/Inspect.pike
index c3190c6281d852f70cfa74e50997ce8f94e2f49b..6efef4de6bf039646f7754653676d97a81a752f0 100644
--- a/lib/modules/Debug.pmod/Inspect.pike
+++ b/lib/modules/Debug.pmod/Inspect.pike
@@ -23,8 +23,8 @@
 //!  return 0;
 //!}
 //!
-//!void destroy() {
-//!  werror("destroy() runs just as often as create()\n");
+//!void _destruct() {
+//!  werror("_destruct() runs just as often as create()\n");
 //!}
 //!@endcode
 //!  Whenever you edit /tmp/test.pike, it will automatically reload
diff --git a/lib/modules/Sql.pmod/pgsql_util.pmod b/lib/modules/Sql.pmod/pgsql_util.pmod
index 198f8910ed1af7c01ad5fc20af702da7a50af089..cdd47b1fe332275ef16a52ebee10d60a01c896c0 100644
--- a/lib/modules/Sql.pmod/pgsql_util.pmod
+++ b/lib/modules/Sql.pmod/pgsql_util.pmod
@@ -547,7 +547,7 @@ outer:
 class conxsess {
   final conxion chain;
 
-  void create(conxion parent) {
+  protected void create(conxion parent) {
     if (parent->started)
       werror("Overwriting conxsess %s %s\n",
         describe_backtrace(({"new ", backtrace()[..<1]})),
@@ -561,7 +561,7 @@ class conxsess {
     chain = 0;
   }
 
-  void destroy() {
+  protected void _destruct() {
     if (chain)
       werror("Untransmitted conxsess %s\n",
        describe_backtrace(({"", backtrace()[..<1]})));