From 2d047eef9c9e0b5bc9c337ab47ab77201115c14f Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?S=C3=ADle=20Ekaterin=20Liszka?= <sheila@vulpine.house>
Date: Mon, 16 Sep 2024 01:57:18 -0700
Subject: [PATCH] unicode.pl: uppercase uniname arg
---
scripts/autorun/unicode.pl | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/scripts/autorun/unicode.pl b/scripts/autorun/unicode.pl
index ab41ec2..f067de1 100644
--- a/scripts/autorun/unicode.pl
+++ b/scripts/autorun/unicode.pl
@@ -73,7 +73,7 @@ sub cmd_process($server, $trigger, $str, $nick, $target) {
my $output = _charinfo($str);
$server->command("msg $target $output");
} elsif ($trigger eq 'uniname') {
- my $charinfo = namedseq($str);
+ my $charinfo = namedseq(uc $str);
my $output;
if (defined($charinfo)) {
my $charnum = ord($charinfo);
--
GitLab