sin/samba-mirror
1
0
Fork 0
mirror of https://github.com/samba-team/samba.git synced 2025-02-23 09:57:40 +03:00
Code

Add True/False bool cleanup script.

Browse Source 
Guenther
(This used to be commit 9f05d2eae7c55d39ad61da54c4a38d6b6f8d4d3a)
This commit is contained in:
Günther Deschner 2008-01-15 10:33:25 +01:00
parent d7582b5186
commit 8a6f492e57
1 changed files with 19 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
source3/script/fix_bool.pl Executable file
View File

@ -0,0 +1,19 @@
#!/usr/bin/perl -w
open(INFILE, "$ARGV[0]") || die $@;
open(OUTFILE, ">$ARGV[0].new") || die $@;
while (<INFILE>) {
$_ =~ s/True/true/;
$_ =~ s/False/false/;
print OUTFILE "$_";
}
close(INFILE);
close(OUTFILE);
rename("$ARGV[0].new", "$ARGV[0]") || die @_;
exit(0);