GitHub
/
pbot
mirror of https://github.com/pragma-/pbot.git
3
0
Fork 0
Code Issues Projects Releases Wiki Activity

This commit is contained in:
Pragmatic Software 2010-04-09 22:53:55 +00:00
parent 654291e8a5
commit fe32a435c0
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
modules/codepad.pl
View File

@ -16,7 +16,7 @@ my %preludes = ( 'C' => "#include <stdio.h>\n#include <stdlib.h>\n#include <stri
);
if($#ARGV <= 0) {
print "Usage: $0 <nick> <code>\n";
print "Usage: cc [-lang=<language>] <code>\n";
exit 0;
}
@ -88,12 +88,12 @@ $output =~ s/\s+/ /g;
$output =~ s/^\s+//g;
$output =~ s/\s+$//g;
$output =~ s/ Line 1 ://g;
$output =~ s/ Line \d+ ://g;
$output =~ s/ \(first use in this function\)//g;
$output =~ s/error: \(Each undeclared identifier is reported only once.*?\)//g;
$output =~ s/error: (.*?) error/error: $1; error/g;
print FILE "$nick: [$url] $output\n\n";
print FILE "$nick: [ $url ] $output\n\n";
close FILE;
print "$nick: $output\n";