Use the correct IRC lowercase whereever needed

[perl/scripts/xchat.git] / services.pl

diff --git a/services.pl b/services.pl
index 0b7af6d1ddfd04f40abe305e71cf3a90427aeb97..e57845cf13c0af877a224357bcee38a4807317f6 100755 (executable)
--- a/services.pl
+++ b/services.pl
@@ -89,7 +89,7 @@ sub csmode {
 
 hook_command "C$_", \&csmode, {
  data => $_,
- help_text => join ' ', $_, '[nicks] ,', (lc $_),
+ help_text => join ' ', $_, '[nicks] ,', lc($_),
     'the specified targets (or you if none) on the current channel via ChanServ'
 } for map { $_, "DE$_" } qw<VOICE HALFOP OP PROTECT>;