diff -r 9d643e691948 -r eb451ec1bf1c src/perl.c
--- a/src/perl.c	Sat Sep 14 19:37:29 2002 +0000
+++ b/src/perl.c	Sat Sep 14 23:27:28 2002 +0000
@@ -757,6 +757,7 @@
 		buf = g_malloc0(1);
 		break;
 	case event_new_conversation:
+	case event_del_conversation:
 		buf = g_strdup_printf("'%s'", escape_quotes(arg1));
 		break;
 	case event_im_displayed_sent:
@@ -780,6 +781,7 @@
 		}
 		break;
 	default:
+		debug_printf("someone forgot to handle %s in the perl binding\n", event_name(event));
 		return 0;
 	}