mirror of
https://github.com/TTimo/GtkRadiant.git
synced 2025-01-10 20:10:56 +00:00
17 lines
284 B
Perl
17 lines
284 B
Perl
|
#!perl
|
||
|
|
rename("brush.c", "brush.c.old");
|
||
|
|
open(FILE, "brush.c.old");
|
||
|
|
open(OFILE, ">brush.c");
|
||
|
|
while(<FILE>)
|
||
|
|
{
|
||
|
|
if($. != 150)
|
||
|
|
{
|
||
|
|
print OFILE;
|
||
|
|
next;
|
||
|
|
}
|
||
|
|
s/Sys_Printf \(/Sys_FPrintf \(SYS_VRB,/;
|
||
|
|
s/Sys_Printf\(/Sys_FPrintf \(SYS_VRB,/;
|
||
|
|
print OFILE;
|
||
|
|
}
|
||
|
|
close(OFILE);
|
||
|
|
close(FILE);
|