[Koha-cvs] CVS: koha MARCdetail.pl,1.25,1.25.2.1

[Paul POULAIN]

Update of /cvsroot/koha/koha
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14926

Modified Files:
      Tag: rel_2_2
	MARCdetail.pl 
Log Message:
modifs to handdle correctly more than 1 subscription of the same biblio. Enter subscription detail in subscription notes (like "for branch XX" or "for 2nd floor"). The subscription details are all shown in OPAC.

you can now delete a subscription that is not yet active (= has only 1 issue in "waiting" state)



Index: MARCdetail.pl
===================================================================
RCS file: /cvsroot/koha/koha/MARCdetail.pl,v
retrieving revision 1.25
retrieving revision 1.25.2.1
diff -C2 -r1.25 -r1.25.2.1
*** MARCdetail.pl	3 Jan 2005 12:57:21 -0000	1.25
--- MARCdetail.pl	11 Jan 2005 15:08:00 -0000	1.25.2.1
***************
*** 57,61 ****
  use C4::Biblio;
  use C4::Acquisition;
! use C4::Bull; #uses getsubscriptionfrom biblionumber
  use HTML::Template;
  
--- 57,61 ----
  use C4::Biblio;
  use C4::Acquisition;
! use C4::Bull; #uses getsubscriptionsfrombiblionumber
  use HTML::Template;
  
***************
*** 190,194 ****
  }
  
! my $subscriptionid = getsubscriptionfrombiblionumber($biblionumber);
  $template->param(item_loop => \@item_value_loop,
  						item_header_loop => \@header_value_loop,
--- 190,194 ----
  }
  
! my $subscriptionsnumber = getsubscriptionfrombiblionumber($biblionumber);
  $template->param(item_loop => \@item_value_loop,
  						item_header_loop => \@header_value_loop,
***************
*** 196,200 ****
  						bibid => $bibid,
  						biblionumber => $biblionumber,
! 						subscriptionid => $subscriptionid,
  						popup => $popup,
  						);
--- 196,200 ----
  						bibid => $bibid,
  						biblionumber => $biblionumber,
! 						subscriptionsnumber => $subscriptionsnumber,
  						popup => $popup,
  						);