Documentation / fix-texi.perlon commit clone: use --progress to force progress reporting (5a518ad)
   1#!/usr/bin/perl -w
   2
   3while (<>) {
   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}