mirror of
https://github.com/pragma-/pbot.git
synced 2024-12-24 03:33:06 +01:00
Lowercase language option
This commit is contained in:
parent
728015672d
commit
ae957c0314
@ -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";
|
||||
|
Loading…
Reference in New Issue
Block a user