Give more info when deletion fails

Author: flack

lib/midcom/baseclasses/core/dbobject.php

@@ -290,7 +290,7 @@ public static function delete(midcom_core_dbaobject $object) : bool
         if (!$object instanceof midcom_db_attachment) {
             foreach ($object->list_attachments() as $attachment) {
                 if (!$attachment->delete()) {
-                    debug_add("Failed to delete attachment ID {$attachment->id}", MIDCOM_LOG_ERROR);
+                    debug_add("Failed to delete attachment ID {$attachment->id}: " . midcom_connection::get_error_string(), MIDCOM_LOG_ERROR);
                     return false;
                 }
             }
@@ -300,7 +300,7 @@ public static function delete(midcom_core_dbaobject $object) : bool
         $query->add_constraint('parentguid', '=', $object->guid);
         foreach ($query->execute() as $parameter) {
             if (!$parameter->delete()) {
-                debug_add("Failed to delete parameter ID {$parameter->id}", MIDCOM_LOG_ERROR);
+                debug_add("Failed to delete parameter ID {$parameter->id}: " . midcom_connection::get_error_string(), MIDCOM_LOG_ERROR);
                 return false;
             }
         }