beb511aadb
git-svn-id: svn://svn.icculus.org/gtkradiant/GtkRadiant/branches/ZeroRadiant.ab@188 8a3a26a2-13c4-0310-b231-cf6edde360e5
17 lines
268 B
Perl
17 lines
268 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); |