koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] koha delitem.pl [dev_week]


From: Joshua Ferraro
Subject: [Koha-cvs] koha delitem.pl [dev_week]
Date: Sun, 24 Sep 2006 00:14:39 +0000

CVSROOT:        /sources/koha
Module name:    koha
Branch:         dev_week
Changes by:     Joshua Ferraro <kados>  06/09/24 00:14:39

Removed files:
        .              : delitem.pl 

Log message:
        removing useless script

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/delitem.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.5&r2=0

Patches:
Index: delitem.pl
===================================================================
RCS file: delitem.pl
diff -N delitem.pl
--- delitem.pl  21 Apr 2003 02:53:14 -0000      1.5
+++ /dev/null   1 Jan 1970 00:00:00 -0000
@@ -1,42 +0,0 @@
-#!/usr/bin/perl
-
-#script to delete items
-#written 2/5/00
-#by address@hidden
-
-
-# Copyright 2000-2002 Katipo Communications
-#
-# This file is part of Koha.
-#
-# Koha is free software; you can redistribute it and/or modify it under the
-# terms of the GNU General Public License as published by the Free Software
-# Foundation; either version 2 of the License, or (at your option) any later
-# version.
-#
-# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
-# 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
-
-use strict;
-
-use C4::Search;
-use CGI;
-use C4::Output;
-use C4::Biblio;
-use C4::Auth;
-
-my $input = new CGI;
-my $flagsrequired;
-$flagsrequired->{editcatalogue}=1;
-my ($loggedinuser, $cookie, $sessionID) = checkauth($input, 0, $flagsrequired);
-
-#print $input->header;
-my $item=$input->param('itemnum');
-delitem($item);
-my $bibitemnum=$input->param('bibitemnum');
-print $input->redirect("/cgi-bin/koha/moredetail.pl?bi=$bibitemnum");




reply via email to

[Prev in Thread] Current Thread [Next in Thread]