From af9e533a5419084ec9260c3c55cd2799122cc7e1 Mon Sep 17 00:00:00 2001
From: John Beppu <beppu@lbox.org>
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 <beppu@lineo.com>
 
 =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