From ae830774dbccb20aca90cf85a417aa2da2a9cc5c Mon Sep 17 00:00:00 2001
From: Colin Campbell <colin.campbell@ptfs-europe.com>
Date: Wed, 3 Feb 2010 14:45:27 +0000
Subject: [PATCH] Fix pod markup errors in C4/Budgets.pm

Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
---
 C4/Budgets.pm | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/C4/Budgets.pm b/C4/Budgets.pm
index 4a8b3b6487..8d0a2f03bd 100644
--- a/C4/Budgets.pm
+++ b/C4/Budgets.pm
@@ -630,14 +630,14 @@ sub DelBudget {
 	return $rc;
 }
 
-=back
-
 =head2 FUNCTIONS ABOUT BUDGETS
 
 =over 2
 
 =cut
 
+=back
+
 =head3 GetBudget
 
 =over 4
@@ -773,9 +773,12 @@ sub ConvertCurrency {
     return ( $price / $cur );
 }
 
-=item
+=head3 _columns
+
 	returns an array containing fieldname followed by PRI as value if PRIMARY Key
+
 =cut
+
 sub _columns(;$) {
 	my $tablename=shift||"aqbudgets";
     return @{C4::Context->dbh->selectcol_arrayref("SHOW columns from $tablename",{Columns=>[1,4]})};
@@ -806,8 +809,6 @@ END { }    # module clean-up code here (global destructor)
 1;
 __END__
 
-=back
-
 =head1 AUTHOR
 
 Koha Developement team <info@koha.org>
-- 
2.39.5