3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-12-25 04:02:37 +01:00

Lowercase language option

This commit is contained in:
Pragmatic Software 2015-01-17 07:00:47 -08:00
parent 728015672d
commit ae957c0314

View File

@ -23,10 +23,10 @@ if(not defined $sock) {
my $nick = shift @ARGV; my $nick = shift @ARGV;
my $code = join ' ', @ARGV; my $code = join ' ', @ARGV;
my $lang = "C11"; my $lang = "c11";
if($code =~ s/-lang=([^ ]+)//) { if($code =~ s/-lang=([^ ]+)//) {
$lang = uc $1; $lang = lc $1;
} }
print $sock "compile:$nick:$lang\n"; print $sock "compile:$nick:$lang\n";