Set a default part message

Fixes a bug where some IRC servers get angry at us for having an empty
part message.

1 files changed, 1 insertions, 0 deletions

diff --git a/idalius.pl b/idalius.pl
index 271f447..3bf21f8 100755
--- a/idalius.pl
+++ b/idalius.pl
@@ -153,6 +153,7 @@ sub irc_msg {
 			$what =~ s/^part\s+//;
 			my ($chan_str, $reason) = split /\s+(?!#)/, $what, 2;
 			my @channels = split /\s+/, $chan_str;
+			$reason = "Commanded by $nick" unless $reason;
 			$irc->yield(part => @channels => $reason);
 			$irc->yield(privmsg => $nick => "Requested.");
 		} else {