1 files changed, 3 insertions, 6 deletions
diff --git a/lib/Object/Groupware/Event.pm b/lib/Object/Groupware/Event.pm
index 270028e..7384176 100644
--- a/lib/Object/Groupware/Event.pm
+++ b/lib/Object/Groupware/Event.pm
@@ -10,6 +10,7 @@ use utf8;
 use Log::Any qw( );
 use Feature::Compat::Try;
 use DateTime::Locale;
+use Encode qw(decode_utf8);
 
 field $log = Log::Any->get_logger;
 
@@ -67,12 +68,8 @@ ADJUST {
 		}
 	}
 
-	if ( $log->is_trace ) {
-		use DDP;
-		p $entry;
-		p $start;
-		p $end;
-	}
+	$log->tracef( "Object %s contents:\n%s", __CLASS__,
+		decode_utf8 $entry->as_string );
 }
 
 method attendees   { !!@attendees   ? [@attendees]   : undef }