Kumara - predecessor to Koha
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

20 lines
367 B

  1. #!/usr/bin/perl
  2. #script to delete items
  3. #written 2/5/00
  4. #by chris@katipo.co.nz
  5. use strict;
  6. use C4::Search;
  7. use CGI;
  8. use C4::Output;
  9. use C4::Acquisitions;
  10. my $input = new CGI;
  11. #print $input->header;
  12. my $item=$input->param('itemnum');
  13. delitem($item);
  14. my $bibitemnum=$input->param('bibitemnum');
  15. print $input->redirect("/cgi-bin/koha/moredetail.pl?bi=$bibitemnum");