Merge branch 'es/chain-lint-more'
[git] / Documentation / fix-texi.perl
1 #!/usr/bin/perl -w
2
3 while (<>) {
4         if (/^\@setfilename/) {
5                 $_ = "\@setfilename git.info\n";
6         } elsif (/^\@direntry/) {
7                 print '@dircategory Development
8 @direntry
9 * Git: (git).           A fast distributed revision control system
10 @end direntry
11 ';      }
12         unless (/^\@direntry/../^\@end direntry/) {
13                 print;
14         }
15 }