diff -r a6f97556fe51 -r 30c4753d2500 plugins/perl/perl.c
--- a/plugins/perl/perl.c	Fri Jun 06 15:47:32 2003 +0000
+++ b/plugins/perl/perl.c	Fri Jun 06 16:20:52 2003 +0000
@@ -747,7 +747,7 @@
 		g_snprintf(a.message, sizeof(a.message), "%s", message);
 		do_away_message(NULL, &a);
 	} else if (!strncasecmp(command, "back", 4)) {
-		do_im_back();
+		do_im_back(NULL, NULL);
 	} else if (!strncasecmp(command, "idle", 4)) {
 		GList *c = gaim_connections_get_all();
 		GaimConnection *gc;