From e3b16b3856bdd5c1645f4609d61bf5a16c026930 Mon Sep 17 00:00:00 2001 From: Daniel Baumann Date: Mon, 6 May 2024 02:39:23 +0200 Subject: Adding upstream version 2.19.5+deb10u1. Signed-off-by: Daniel Baumann --- doc/genmanpage.pl | 30 ++++++++++++++++++++++++++++++ 1 file changed, 30 insertions(+) create mode 100644 doc/genmanpage.pl (limited to 'doc/genmanpage.pl') diff --git a/doc/genmanpage.pl b/doc/genmanpage.pl new file mode 100644 index 0000000..9d33c15 --- /dev/null +++ b/doc/genmanpage.pl @@ -0,0 +1,30 @@ +#!/usr/bin/perl + +use strict; +use warnings; + +# Define item leadin/leadout for man output +my $ITEM_LEADIN = '.IP "\fI'; +my $ITEM_LEADOUT = '\fR(1)"'; + +my $package; +my $description; + + +# Parse the shortened README file +while (<>) { + chomp; + # A line starting with ' -' indicates a script + if (/^ - ([^:]*): (.*)/) { + if ($package and $description) { + # If we get here, then we need to output the man code + print $ITEM_LEADIN . $package . $ITEM_LEADOUT . "\n"; + print $description . "\n"; + } + $package = $1; + $description = $2; + } else { + s/^ //; + $description .= $_; + } +} -- cgit v1.2.3