mirror of
https://github.com/git/git
synced 2024-08-24 18:26:02 +00:00
[PATCH] Add Makefile target glossary.html
This also includes a script which does the sorting, and introduces hyperlinks for every described term. Signed-off-by: Johannes Schindelin <Johannes.Schindelin@gmx.de> Signed-off-by: Junio C Hamano <junkio@cox.net>
This commit is contained in:
parent
379955c696
commit
23bb8df2fb
|
@ -1,7 +1,7 @@
|
|||
MAN1_TXT=$(wildcard git-*.txt)
|
||||
MAN7_TXT=git.txt
|
||||
|
||||
DOC_HTML=$(patsubst %.txt,%.html,$(MAN1_TXT) $(MAN7_TXT))
|
||||
DOC_HTML=$(patsubst %.txt,%.html,$(MAN1_TXT) $(MAN7_TXT)) glossary.html
|
||||
|
||||
DOC_MAN1=$(patsubst %.txt,%.1,$(MAN1_TXT))
|
||||
DOC_MAN7=$(patsubst %.txt,%.7,$(MAN7_TXT))
|
||||
|
@ -54,3 +54,8 @@ clean:
|
|||
%.xml : %.txt
|
||||
asciidoc -b docbook -d manpage $<
|
||||
|
||||
glossary.html : glossary.txt sort_glossary.pl
|
||||
cat $< | \
|
||||
perl sort_glossary.pl | \
|
||||
asciidoc -b xhtml11 - > glossary.html
|
||||
|
||||
|
|
70
Documentation/sort_glossary.pl
Normal file
70
Documentation/sort_glossary.pl
Normal file
|
@ -0,0 +1,70 @@
|
|||
#!/usr/bin/perl
|
||||
|
||||
%terms=();
|
||||
|
||||
while(<>) {
|
||||
if(/^(\S.*)::$/) {
|
||||
my $term=$1;
|
||||
if(defined($terms{$term})) {
|
||||
die "$1 defined twice\n";
|
||||
}
|
||||
$terms{$term}="";
|
||||
LOOP: while(<>) {
|
||||
if(/^$/) {
|
||||
last LOOP;
|
||||
}
|
||||
if(/^ \S/) {
|
||||
$terms{$term}.=$_;
|
||||
} else {
|
||||
die "Error 1: $_";
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
sub format_tab_80 ($) {
|
||||
my $text=$_[0];
|
||||
my $result="";
|
||||
$text=~s/\s+/ /g;
|
||||
$text=~s/^\s+//;
|
||||
while($text=~/^(.{1,72})(|\s+(\S.*)?)$/) {
|
||||
$result.=" ".$1."\n";
|
||||
$text=$3;
|
||||
}
|
||||
return $result;
|
||||
}
|
||||
|
||||
sub no_spaces ($) {
|
||||
my $result=$_[0];
|
||||
$result=~tr/ /_/;
|
||||
return $result;
|
||||
}
|
||||
|
||||
print 'GIT Glossary
|
||||
============
|
||||
Aug 2005
|
||||
|
||||
This list is sorted alphabetically:
|
||||
|
||||
';
|
||||
|
||||
@keys=sort {uc($a) cmp uc($b)} keys %terms;
|
||||
$pattern='(\b'.join('\b|\b',reverse @keys).'\b)';
|
||||
foreach $key (@keys) {
|
||||
$terms{$key}=~s/$pattern/sprintf "<<ref_".no_spaces($1).",$1>>";/eg;
|
||||
print '[[ref_'.no_spaces($key).']]'.$key."::\n"
|
||||
.format_tab_80($terms{$key})."\n";
|
||||
}
|
||||
|
||||
print '
|
||||
|
||||
Author
|
||||
------
|
||||
Written by Johannes Schindelin <Johannes.Schindelin@gmx.de> and
|
||||
the git-list <git@vger.kernel.org>.
|
||||
|
||||
GIT
|
||||
---
|
||||
Part of the link:git.html[git] suite
|
||||
';
|
||||
|
Loading…
Reference in a new issue