This breaks SearchSuggestion(), just so you know. Any array or hash in a list assignment will take all elements from the list on the right of the '='. So the code below pushes all parameters into the %suggestion hash, as key / value pairs, and $suggestedbyme doesn't get set.
On Thu, 2009-05-28 at 18:33 +0200, [email protected] wrote: > From: Paul Poulain <[email protected]> > > --- > C4/Suggestions.pm | 187 > ++++++++++++++++++++++++++--------------------------- > 1 files changed, 91 insertions(+), 96 deletions(-) > > diff --git a/C4/Suggestions.pm b/C4/Suggestions.pm > index 1732540..8d9295b 100644 > --- a/C4/Suggestions.pm > +++ b/C4/Suggestions.pm [snip] > @@ -85,7 +85,7 @@ Note the status is stored twice : > =cut > > sub SearchSuggestion { > - my > ($user,$author,$title,$publishercode,$status,$suggestedbyme,$branchcode)=...@_; > + my (%suggestion,$suggestedbyme)=...@_; > my $dbh = C4::Context->dbh; > my $query = " > SELECT suggestions.*, [snip] -- Michael Hafen Systems Analyst and Programmer Washington County School District Utah, USA for Koha checkout http://development.washk12.org/gitweb/ or git://development.washk12.org/koha _______________________________________________ Koha-patches mailing list [email protected] http://lists.koha.org/mailman/listinfo/koha-patches
