3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-12-24 11:42:35 +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 $code = join ' ', @ARGV;
my $lang = "C11";
my $lang = "c11";
if($code =~ s/-lang=([^ ]+)//) {
$lang = uc $1;
$lang = lc $1;
}
print $sock "compile:$nick:$lang\n";