X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=serials%2Facqui-search-result.pl;h=5839cd498e716f3c8672702f130cc2ae0c04ba3c;hb=bc33391fc5491e0acbc9431d3a6b24c4f357ff79;hp=df73738cb1dc5cbd9af797881d4567025b808b87;hpb=868b8cdbaa079a948a6015f713fa3384a7f404b5;p=koha_gimpoz diff --git a/serials/acqui-search-result.pl b/serials/acqui-search-result.pl index df73738cb1..5839cd498e 100755 --- a/serials/acqui-search-result.pl +++ b/serials/acqui-search-result.pl @@ -16,9 +16,9 @@ # WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR # A PARTICULAR PURPOSE. See the GNU General Public License for more details. # -# You should have received a copy of the GNU General Public License along with -# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, -# Suite 330, Boston, MA 02111-1307 USA +# You should have received a copy of the GNU General Public License along +# with Koha; if not, write to the Free Software Foundation, Inc., +# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. =head1 NAME @@ -27,7 +27,7 @@ acqui-search-result.pl =head1 DESCRIPTION TODO - + =head1 PARAMETERS =over 4 @@ -47,7 +47,7 @@ use C4::Output; use CGI; use C4::Acquisition; use C4::Dates qw/format_date/; -use C4::Bookseller; +use C4::Bookseller qw( GetBookSeller ); my $query=new CGI; my ($template, $loggedinuser, $cookie) @@ -55,7 +55,7 @@ my ($template, $loggedinuser, $cookie) query => $query, type => "intranet", authnotrequired => 0, - flagsrequired => {serials => 1}, + flagsrequired => {serials => '*'}, debug => 1, }); @@ -67,7 +67,7 @@ my @suppliers = GetBookSeller($supplier); my $loop_suppliers = []; for my $s (@suppliers) { my $orders = GetPendingOrders($s->{'id'}); - + my $loop_basket = []; for my $ord ( @{$orders} ) { push @{$loop_basket}, {