[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/opac opac-serial-issues.pl,1.1.2.5,1.1.2.6
From: |
Henri-Damien LAURENT |
Subject: |
[Koha-cvs] CVS: koha/opac opac-serial-issues.pl,1.1.2.5,1.1.2.6 |
Date: |
Fri, 03 Jun 2005 05:53:10 -0700 |
Update of /cvsroot/koha/koha/opac
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22616/opac
Modified Files:
Tag: rel_2_2
opac-serial-issues.pl
Log Message:
Featuring OPAC with Full History Subscription
Index: opac-serial-issues.pl
===================================================================
RCS file: /cvsroot/koha/koha/opac/opac-serial-issues.pl,v
retrieving revision 1.1.2.5
retrieving revision 1.1.2.6
diff -C2 -r1.1.2.5 -r1.1.2.6
*** opac-serial-issues.pl 2 Jun 2005 21:04:35 -0000 1.1.2.5
--- opac-serial-issues.pl 3 Jun 2005 12:53:08 -0000 1.1.2.6
***************
*** 25,35 ****
my $subscriptions =
get_full_subscription_list_from_biblionumber($biblionumber);
! my $year;
! my $yearmin=$subscriptions->[1]{year};
! warn "yearmin".$yearmin;
! my $yearmax;
! my @loopissues;
! my $yearmax=$subscriptions->[scalar(@$subscriptions)]{year};
! warn "yearmax".$yearmax;
--- 25,34 ----
my $subscriptions =
get_full_subscription_list_from_biblionumber($biblionumber);
! my $title = $subscriptions->[0]{bibliotitle};
! warn "title ".$title;
! my $yearmin=$subscriptions->[0]{year};
! warn "yearmin ".$yearmin;
! my $yearmax=$subscriptions->[scalar(@$subscriptions)-1]{year};
! warn "yearmax ".$yearmax;
***************
*** 50,53 ****
--- 49,53 ----
yearmin => $yearmin,
yearmax =>$yearmax,
+ bibliotitle => $title,
suggestion => C4::Context->preference("suggestion"),
virtualshelves => C4::Context->preference("virtualshelves"),
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/opac opac-serial-issues.pl,1.1.2.5,1.1.2.6,
Henri-Damien LAURENT <=