summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBrendan O'Dea <bod@debian.org>2011-05-29 22:47:16 +1000
committerBrendan O'Dea <bod@debian.org>2011-05-29 22:47:16 +1000
commitfd9c9c0e27d48bc6071cd175d38363b03114178c (patch)
tree5fa90a8f98f606c49e3daac9286850b7ac59ecb6
parent3611471791ec50e5515615ef57a2f1fa09827fb3 (diff)
downloadhelp2man-fd9c9c0e27d48bc6071cd175d38363b03114178c.tar.gz
Drop section numbers, and headersv1.40.1
-rwxr-xr-xhelp2man.html.PL11
1 files changed, 9 insertions, 2 deletions
diff --git a/help2man.html.PL b/help2man.html.PL
index 3b50bfc..e030296 100755
--- a/help2man.html.PL
+++ b/help2man.html.PL
@@ -39,8 +39,8 @@ die "can't parse boilerplate" unless $footer;
# Generate manual from texinfo
my $texi_tmp = File::Temp->new();
-system 'makeinfo', '--html', '--no-split', '--output=' . $texi_tmp->filename,
- 'help2man.texi';
+system 'makeinfo', '--html', '--no-number-sections', '--no-headers',
+ '--no-split', '--output=' . $texi_tmp->filename, 'help2man.texi';
my $gnu_standards = "http://www.gnu.org/prep/standards/standards.html";
my $body = <$texi_tmp>;
@@ -76,3 +76,10 @@ print "Extracting $target (with GNU boilerplate)\n"
unless $opts{quiet};
print $out $header, $body, $footer;
+
+# Fix output file permissions
+unless ($opts{stdout})
+{
+ close $out;
+ chmod 0444, $target or warn "$0: can't change mode of $target ($!)\n";
+}