docs/gtkdocs_fix


1
2
3
4
5
6
7
8
9
10
11

#!/usr/bin/perl

# Stupid script to fix look of html files created with sgml2html...

foreach (@ARGV) {
    print "Fixing... $_\n";
    system("mv $_ $_.orig");
    system("sed -e 's/<BODY>/<BODY BGCOLOR=\"#FFFFFF\">/g' -e 's/<HR>/<HR NOSHADE>/g' $_.orig > $_");
    unlink("$_.orig");
}