From 10d5bb91abf976d54d1035cbb8152e2185e53648 Mon Sep 17 00:00:00 2001 From: deepend Date: Wed, 25 Feb 2026 02:14:38 -0700 Subject: [PATCH] Cleaned up unneeded, commented-out debug logging lines in Perl plugin callback handlers (server_cb, command_cb, and print_cb) without changing runtime behavior. --- plugins/perl/perl.c | 5 ----- 1 file changed, 5 deletions(-) diff --git a/plugins/perl/perl.c b/plugins/perl/perl.c index 05ecf2f3..3671353f 100644 --- a/plugins/perl/perl.c +++ b/plugins/perl/perl.c @@ -440,8 +440,6 @@ server_cb (char *word[], char *word_eol[], void *userdata) if (data->depth) return ZOITECHAT_EAT_NONE; - /* zoitechat_printf (ph, */ - /* "Received %d words in server callback", av_len (wd)); */ PUSHMARK (SP); XPUSHs (newRV_noinc ((SV *) array2av (word))); XPUSHs (newRV_noinc ((SV *) array2av (word_eol))); @@ -489,8 +487,6 @@ command_cb (char *word[], char *word_eol[], void *userdata) if (data->depth) return ZOITECHAT_EAT_NONE; - /* zoitechat_printf (ph, "Received %d words in command callback", */ - /* av_len (wd)); */ PUSHMARK (SP); XPUSHs (newRV_noinc ((SV *) array2av (word))); XPUSHs (newRV_noinc ((SV *) array2av (word_eol))); @@ -567,7 +563,6 @@ print_cb (char *word[], void *userdata) } } - /*zoitechat_printf (ph, "Received %d words in print callback", av_len (wd)+1); */ PUSHMARK (SP); XPUSHs (newRV_noinc ((SV *) wd)); XPUSHs (data->userdata);