From af9e533a5419084ec9260c3c55cd2799122cc7e1 Mon Sep 17 00:00:00 2001 From: John Beppu Date: Thu, 15 Mar 2001 20:49:25 +0000 Subject: [PATCH] - properly indent Examples section in pod generator --- docs/autodocifier.pl | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/docs/autodocifier.pl b/docs/autodocifier.pl index e967568e1..7c3aa50bc 100755 --- a/docs/autodocifier.pl +++ b/docs/autodocifier.pl @@ -69,8 +69,13 @@ sub pod_for_usage { # prepare example if one exists my $example = (defined $usage->{example}) - ? "Example:\n\n$usage->{example}\n\n" + ? $usage->{example} : ""; + $example = + "Example:\n\n" . + join ("\n", + map { " $_" } + split("\n", $example)) . "\n\n"; return "=item I<$name>". @@ -222,4 +227,4 @@ John BEPPU =cut -# $Id: autodocifier.pl,v 1.15 2001/03/15 18:14:25 andersen Exp $ +# $Id: autodocifier.pl,v 1.16 2001/03/15 20:49:25 beppu Exp $ -- 2.25.1