[Koha-cvs] CVS: koha/opac opac-serial-issues.pl,1.1.2.6,1.1.2.7

Paul POULAIN tipaul at users.sourceforge.net
Thu Jun 16 17:47:54 CEST 2005


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

Modified Files:
      Tag: rel_2_2
	opac-serial-issues.pl 
Log Message:
switching to complete or standard history view

Index: opac-serial-issues.pl
===================================================================
RCS file: /cvsroot/koha/koha/opac/opac-serial-issues.pl,v
retrieving revision 1.1.2.6
retrieving revision 1.1.2.7
diff -C2 -r1.1.2.6 -r1.1.2.7
*** opac-serial-issues.pl	3 Jun 2005 12:53:08 -0000	1.1.2.6
--- opac-serial-issues.pl	16 Jun 2005 15:47:52 -0000	1.1.2.7
***************
*** 15,20 ****
  my $op = $query->param('op');
  my $dbh = C4::Context->dbh;
! my $selectview = C4::Context->preference("SubscriptionHistory");
! warn "selectview : ".$selectview;
  
  my $sth;
--- 15,20 ----
  my $op = $query->param('op');
  my $dbh = C4::Context->dbh;
! my $selectview = $query->param('selectview');
! $selectview = C4::Context->preference("SubscriptionHistory") unless $selectview;
  
  my $sth;
***************
*** 23,77 ****
  my $biblionumber = $query->param('biblionumber');
  if ($selectview eq "full"){
! 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;
! 
! 
! ($template, $loggedinuser, $cookie)
! = get_template_and_user({template_name => "opac-full-serial-issues.tmpl",
! 				query => $query,
! 				type => "opac",
! 				authnotrequired => 1,
! 				debug => 1,
! 				});
! 
! # replace CR by <br> in librarian note
! # $subscription->{opacnote} =~ s/\n/\<br\/\>/g;
! 
! $template->param(
! 	biblionumber => $query->param('biblionumber'),
! 	years => $subscriptions,
! 	yearmin => $yearmin,
! 	yearmax =>$yearmax,
! 	bibliotitle => $title,
! 	suggestion => C4::Context->preference("suggestion"),
! 	virtualshelves => C4::Context->preference("virtualshelves"),
! 	);
  
  } else {
! my $subscriptions = get_subscription_list_from_biblionumber($biblionumber);
! 
! ($template, $loggedinuser, $cookie)
! = get_template_and_user({template_name => "opac-serial-issues.tmpl",
! 				query => $query,
! 				type => "opac",
! 				authnotrequired => 1,
! 				debug => 1,
! 				});
! 
! # replace CR by <br> in librarian note
! # $subscription->{opacnote} =~ s/\n/\<br\/\>/g;
! 
! $template->param(
! 	biblionumber => $query->param('biblionumber'),
! 	subscription_LOOP => $subscriptions,
! 	suggestion => C4::Context->preference("suggestion"),
! 	virtualshelves => C4::Context->preference("virtualshelves"),
! 	);
  }
  output_html_with_http_headers $query, $cookie, $template->output;
--- 23,77 ----
  my $biblionumber = $query->param('biblionumber');
  if ($selectview eq "full"){
! 	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;
! 	
! 	
! 	($template, $loggedinuser, $cookie)
! 	= get_template_and_user({template_name => "opac-full-serial-issues.tmpl",
! 					query => $query,
! 					type => "opac",
! 					authnotrequired => 1,
! 					debug => 1,
! 					});
! 	
! 	# replace CR by <br> in librarian note
! 	# $subscription->{opacnote} =~ s/\n/\<br\/\>/g;
! 	
! 	$template->param(
! 		biblionumber => $query->param('biblionumber'),
! 		years => $subscriptions,
! 		yearmin => $yearmin,
! 		yearmax =>$yearmax,
! 		bibliotitle => $title,
! 		suggestion => C4::Context->preference("suggestion"),
! 		virtualshelves => C4::Context->preference("virtualshelves"),
! 		);
  
  } else {
! 	my $subscriptions = get_subscription_list_from_biblionumber($biblionumber);
! 	
! 	($template, $loggedinuser, $cookie)
! 	= get_template_and_user({template_name => "opac-serial-issues.tmpl",
! 					query => $query,
! 					type => "opac",
! 					authnotrequired => 1,
! 					debug => 1,
! 					});
! 	
! 	# replace CR by <br> in librarian note
! 	# $subscription->{opacnote} =~ s/\n/\<br\/\>/g;
! 	
! 	$template->param(
! 		biblionumber => $query->param('biblionumber'),
! 		subscription_LOOP => $subscriptions,
! 		suggestion => C4::Context->preference("suggestion"),
! 		virtualshelves => C4::Context->preference("virtualshelves"),
! 		);
  }
  output_html_with_http_headers $query, $cookie, $template->output;





More information about the Koha-cvs mailing list