Revert "Bug 7785: Remove unused function columns() which uses a MySQLism."

[koha_gimpoz] / C4 / Members.pm

diff --git a/C4/Members.pm b/C4/Members.pm
index 056f7e4..6161ac9 100644 (file)
--- a/C4/Members.pm
+++ b/C4/Members.pm
@@ -692,6 +692,10 @@ sub GetMemberIssuesAndFines {
     return ($overdue_count, $issue_count, $total_fines);
 }
 
+sub columns(;$) {
+    return @{C4::Context->dbh->selectcol_arrayref("SHOW columns from borrowers")};
+}
+
 =head2 ModMember
 
   my $success = ModMember(borrowernumber => $borrowernumber,