aboutsummaryrefslogtreecommitdiffstats
path: root/doc/genps.pl
diff options
context:
space:
mode:
authorH. Peter Anvin <hpa@zytor.com>2009-04-19 17:24:54 -0700
committerH. Peter Anvin <hpa@zytor.com>2009-04-19 17:26:09 -0700
commit6ca419e7c56bfc854965c0d6cba81fc24cb527c3 (patch)
treec2d895a9f77f9afce03934f553a2bf81cb89eee4 /doc/genps.pl
parent8e1f81110a3d469fb4b223d21018ccd5fb614927 (diff)
downloadnasm-daily-6ca419e7c56bfc854965c0d6cba81fc24cb527c3.tar.gz
nasm-daily-6ca419e7c56bfc854965c0d6cba81fc24cb527c3.tar.xz
nasm-daily-6ca419e7c56bfc854965c0d6cba81fc24cb527c3.zip
doc: slightly tidy the copyright page of the manual.nasm-2.06rc10-20090419
Diffstat (limited to 'doc/genps.pl')
-rwxr-xr-xdoc/genps.pl18
1 files changed, 12 insertions, 6 deletions
diff --git a/doc/genps.pl b/doc/genps.pl
index 5517d844..6447564c 100755
--- a/doc/genps.pl
+++ b/doc/genps.pl
@@ -217,7 +217,8 @@ sub string2array($)
my($s) = @_;
my(@a) = ();
- $s =~ s/ \- / $charcode{'endash'} /g; # Replace " - " with en dash
+ $s =~ s/\B\-\-\B/$charcode{'emdash'}/g;
+ $s =~ s/\B\-\B/ $charcode{'endash'} /g;
while ( $s =~ /^(\s+|\S+)(.*)$/ ) {
push(@a, [0,$1]);
@@ -594,11 +595,16 @@ unshift(@ptypes, @tocptypes); undef @tocptypes;
#
# Add copyright notice to the beginning
#
-unshift(@paras,
- [[0, $charcode{'copyright'}], [0, ' '], [0,$metadata{'year'}],
- [0, ' '], string2array($metadata{'author'})],
- [string2array($metadata{'license'})]);
-unshift(@ptypes, 'norm', 'norm');
+@copyright_page =
+([[0, $charcode{'copyright'}],
+ [0, ' '], [0, $metadata{'year'}],
+ [0, ' '], string2array($metadata{'author'}),
+ [0, ' '], string2array($metadata{'copyright_tail'})],
+ [string2array($metadata{'license'})],
+ [string2array($metadata{'auxinfo'})]);
+
+unshift(@paras, @copyright_page);
+unshift(@ptypes, ('norm') x scalar(@copyright_page));
$npara = scalar(@paras);