]>
Commit | Line | Data |
---|---|---|
4739809c DK |
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 | } |