[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/acqui.simple addbooks.pl,1.6,1.7 savebiblioitem.pl,
From: |
Gynn Lomax |
Subject: |
[Koha-cvs] CVS: koha/acqui.simple addbooks.pl,1.6,1.7 savebiblioitem.pl,1.3,1.4 |
Date: |
Mon, 13 May 2002 21:12:54 -0700 |
Update of /cvsroot/koha/koha/acqui.simple
In directory usw-pr-cvs1:/tmp/cvs-serv11180/acqui.simple
Modified Files:
addbooks.pl savebiblioitem.pl
Log Message:
Added code to allow deleting of biblioitems
Index: addbooks.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/addbooks.pl,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -r1.6 -r1.7
*** addbooks.pl 29 Apr 2002 05:25:41 -0000 1.6
--- addbooks.pl 14 May 2002 04:12:52 -0000 1.7
***************
*** 12,16 ****
my $input = new CGI;
! my $error = $input->param('error');
print $input->header;
--- 12,17 ----
my $input = new CGI;
! my $error = $input->param('error');
! my $success = $input->param('biblioitem');
print $input->header;
***************
*** 34,38 ****
<p />
EOF
! } # if
print << "EOF";
--- 35,44 ----
<p />
EOF
! } elsif ($success eq "added") {
! print << "EOF";
! <font color="red" size="5">Website Biblioitem Added</font>
! <p />
! EOF
! } # elsif
print << "EOF";
Index: savebiblioitem.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/savebiblioitem.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** savebiblioitem.pl 6 May 2002 02:47:49 -0000 1.3
--- savebiblioitem.pl 14 May 2002 04:12:52 -0000 1.4
***************
*** 36,40 ****
$biblioitemnum = &newbiblioitem($biblioitem);
!
! print $input->redirect("additem.pl?biblioitemnum=$biblioitemnum");
} # else
--- 36,44 ----
$biblioitemnum = &newbiblioitem($biblioitem);
!
! if ($input->param('itemtype') eq "WEB") {
! print $input->redirect("addbooks.pl?biblioitem=added");
! } else {
! print $input->redirect("additem.pl?biblioitemnum=$biblioitemnum");
! } # else
} # else
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/acqui.simple addbooks.pl,1.6,1.7 savebiblioitem.pl,1.3,1.4,
Gynn Lomax <=