From 3db297141ed28670ac7bd7b4a21cd8eac917fbac Mon Sep 17 00:00:00 2001
From: Michael Andreen <michael@andreen.dev>
Date: Thu, 12 Jan 2023 21:57:56 +0100
Subject: [PATCH] Print dm content in log

---
 Delling.pm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/Delling.pm b/Delling.pm
index 2b5eff8..feb1d80 100644
--- a/Delling.pm
+++ b/Delling.pm
@@ -237,6 +237,10 @@ after discord_message_create => sub {
 	}
 
 	say localtime(time) . " - $channel_id $channel $author_name $author_id";
+	if ($channel eq 'dm')
+	{
+		say " - '$msg'";
+	}
 
 	my $c = NDIRC::DiscordContext->new({
 			discord_id => $author_name,
-- 
2.39.2