From 5f45cca86e4ac1e017b1a193ca87bc2326e116ce Mon Sep 17 00:00:00 2001
From: David Phillips <david@sighup.nz>
Date: Thu, 10 Aug 2017 13:32:44 +1200
Subject: Set a default part message

Fixes a bug where some IRC servers get angry at us for having an empty
part message.
---
 idalius.pl | 1 +
 1 file changed, 1 insertion(+)

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 {
-- 
cgit v1.1