From b39c26b5c3b29c1db3c2068aabb3acda783f366d Mon Sep 17 00:00:00 2001 From: pate Date: Thu, 25 Apr 2002 17:30:03 +0000 Subject: [PATCH] added a simple POD style comment to &bold to show how it can be done. --- C4/Output.pm | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/C4/Output.pm b/C4/Output.pm index 94aee20aab..da4c558e3d 100644 --- a/C4/Output.pm +++ b/C4/Output.pm @@ -382,10 +382,15 @@ sub endcenter() { return ("\n"); } +=pod +=head2 &bold + &bold requires that a single string be passed in by the caller. &bold + will return "$text" where $text is the string passed in. +=cut + sub bold($) { - my ($text)=@_; - my $string="$text"; - return($string); + my ($text)=shift; + return("$text"); } END { } # module clean-up code here (global destructor) -- 2.39.5