From 288ea72ca2d1557809ccdbbce507bca02721052c Mon Sep 17 00:00:00 2001
From: Janik Kleinhoff <ilbelkyr@shalture.org>
Date: Sun, 5 Mar 2017 02:11:37 +0000
Subject: Mention hostname in cloning $xresult

Fixes T21. $xresult now takes the form
    "foo, bar, baz, and qux [@example.org]"
---
 lib/ASM/Classes.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/ASM/Classes.pm b/lib/ASM/Classes.pm
index 5f9c6ad..88eafd0 100644
--- a/lib/ASM/Classes.pm
+++ b/lib/ASM/Classes.pm
@@ -57,7 +57,7 @@ sub cloning {
                     ($chan ~~ $::sn{$_}->{mship})
                    } keys %::sn;
   if ($#nicks >= $max) {
-    return ASM::Util->commaAndify(@nicks);
+    return ASM::Util->commaAndify(@nicks) . " [\@$event->{host}]";
   }
   return 0;
 }
-- 
cgit v1.2.3