diff options
author | Eric Wong <e@80x24.org> | 2021-11-09 00:20:50 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2021-11-09 00:43:37 +0000 |
commit | f349c77a421ef1082eb0b22e8f71304df610fa6b (patch) | |
tree | 460bb3bd35e1b9f057c90b11627fd2e2b5c6110f /Makefile.PL | |
parent | 666dde69a3f64456321b7c701070712d6b85e359 (diff) | |
download | public-inbox-f349c77a421ef1082eb0b22e8f71304df610fa6b.tar.gz |
Text versions of manpages do not need to be generated for normal installations, they're only used for generating HTML and our amazing, award-winning homepage. We'll also rely on touch(1) instead of Perl utime to benefit users w/o git-set-file-times in txt2pre. Perl numeric values cannot represent nanosecond resolution accurately even with Time::HiRes; which causes nanosecond-aware make(1) implementations to repeatedly rebuild.
Diffstat (limited to 'Makefile.PL')
-rw-r--r-- | Makefile.PL | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/Makefile.PL b/Makefile.PL index c0aef488..cde6194b 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -23,7 +23,7 @@ push @dtxt, @{$v->{txt}}; for my $txt (@dtxt) { my $html = $txt; $html =~ s/\.txt\z/.html/ or $html .= '.html'; - $t->{"$html : $txt"} = [ "\$(txt2pre) <$txt" ]; + $t->{"$html : $txt"} = [ "\$(txt2pre) <$txt", "touch -r $txt \$@" ]; } $v->{t_slash_star_dot_t} = [ grep(m!\At/.*\.t\z!, @manifest) ]; my @scripts = qw(scripts/ssoma-replay); # legacy @@ -74,9 +74,10 @@ for my $i (@sections) { my $txt = "Documentation/$m.txt"; $t->{"$m.$i : $pod"} = [ "\$(podman) -s$i $pod \$@" ]; $t->{"$txt : $m.$i"} = [ "\$(man2text) ./$m.$i >\$\@+", - "touch -r $pod \$\@+", + "touch -r $pod \$\@+ ./$m.$i", "mv \$\@+ \$@" ]; - $t->{"Documentation/$m.html : $txt"} = [ "\$(txt2pre) <$txt" ]; + $t->{"Documentation/$m.html : $txt"} = [ "\$(txt2pre) <$txt", + "touch -r $txt \$@" ]; $t->{".$m.cols : $m.$i"} = [ "\@echo CHECK80 $m.$i;". "COLUMNS=80 \$(MAN) ./$m.$i | \$(check_man)", @@ -91,13 +92,13 @@ for my $i (@sections) { push @{$v->{manuals}}, @$manuals; push @{$v->{mantxt}}, map { "Documentation/$_.txt" } @$ary; } -push @dtxt, @{$v->{mantxt}}; +push @dtxt; $v->{docs} = [ @dtxt, 'NEWS' ]; $v->{docs_html} = [ map {; my $x = $_; $x =~ s/\.txt\z//; "$x.html" - } @{$v->{docs}} ]; + } (@{$v->{docs}}, @{$v->{mantxt}}) ]; $v->{gz_docs} = [ map { "$_.gz" } (@{$v->{docs}},@{$v->{docs_html}}) ]; $v->{rsync_docs} = [ @{$v->{gz_docs}}, @{$v->{docs}}, @{$v->{docs_html}}, qw(NEWS.atom NEWS.atom.gz)]; |