about summary refs log tree commit diff
path: root/third_party/git/Documentation/cat-texi.perl
diff options
context:
space:
mode:
Diffstat (limited to 'third_party/git/Documentation/cat-texi.perl')
-rwxr-xr-xthird_party/git/Documentation/cat-texi.perl46
1 files changed, 0 insertions, 46 deletions
diff --git a/third_party/git/Documentation/cat-texi.perl b/third_party/git/Documentation/cat-texi.perl
deleted file mode 100755
index 14d2f83415..0000000000
--- a/third_party/git/Documentation/cat-texi.perl
+++ /dev/null
@@ -1,46 +0,0 @@
-#!/usr/bin/perl -w
-
-use strict;
-use warnings;
-
-my @menu = ();
-my $output = $ARGV[0];
-
-open my $tmp, '>', "$output.tmp";
-
-while (<STDIN>) {
-	next if (/^\\input texinfo/../\@node Top/);
-	next if (/^\@bye/ || /^\.ft/);
-	if (s/^\@top (.*)/\@node $1,,,Top/) {
-		push @menu, $1;
-	}
-	s/\(\@pxref\{\[(URLS|REMOTES)\]}\)//;
-	s/\@anchor\{[^{}]*\}//g;
-	print $tmp $_;
-}
-close $tmp;
-
-print '\input texinfo
-@setfilename gitman.info
-@documentencoding UTF-8
-@dircategory Development
-@direntry
-* Git Man Pages: (gitman).  Manual pages for Git revision control system
-@end direntry
-@node Top,,, (dir)
-@top Git Manual Pages
-@documentlanguage en
-@menu
-';
-
-for (@menu) {
-	print "* ${_}::\n";
-}
-print "\@end menu\n";
-open $tmp, '<', "$output.tmp";
-while (<$tmp>) {
-	print;
-}
-close $tmp;
-print "\@bye\n";
-unlink "$output.tmp";