[Koha-cvs] CVS: koha/members member-flags.pl,1.3,1.4 member.pl,1.9,1.10 moremember.pl,1.16,1.17

Paul POULAIN tipaul at users.sourceforge.net
Thu Sep 22 12:01:48 CEST 2005


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

Modified Files:
	member-flags.pl member.pl moremember.pl 
Log Message:
see mail on koha-devel : code cleaning on Search.pm + normalizing API + use of biblionumber everywhere (instead of bn, biblio, ...)

Index: member-flags.pl
===================================================================
RCS file: /cvsroot/koha/koha/members/member-flags.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** member-flags.pl	22 Nov 2004 15:53:20 -0000	1.3
--- member-flags.pl	22 Sep 2005 10:01:46 -0000	1.4
***************
*** 28,32 ****
  				type => "intranet",
  				authnotrequired => 0,
! 				flagsrequired => {borrowers => 1},
  				debug => 1,
  				});
--- 28,32 ----
  				type => "intranet",
  				authnotrequired => 0,
! 				flagsrequired => {permissions => 1},
  				debug => 1,
  				});

Index: member.pl
===================================================================
RCS file: /cvsroot/koha/koha/members/member.pl,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -r1.9 -r1.10
*** member.pl	9 Sep 2005 10:04:55 -0000	1.9
--- member.pl	22 Sep 2005 10:01:46 -0000	1.10
***************
*** 29,33 ****
  use C4::Interface::CGI::Output;
  use CGI;
! use C4::Search;
  use HTML::Template;
  
--- 29,33 ----
  use C4::Interface::CGI::Output;
  use CGI;
! use C4::Members;
  use HTML::Template;
  

Index: moremember.pl
===================================================================
RCS file: /cvsroot/koha/koha/members/moremember.pl,v
retrieving revision 1.16
retrieving revision 1.17
diff -C2 -r1.16 -r1.17
*** moremember.pl	22 Aug 2005 04:18:31 -0000	1.16
--- moremember.pl	22 Sep 2005 10:01:46 -0000	1.17
***************
*** 38,42 ****
  use C4::Interface::CGI::Template;
  use CGI;
! use C4::Search;
  use Date::Manip;
  use C4::Date;
--- 38,42 ----
  use C4::Interface::CGI::Template;
  use CGI;
! use C4::Members;
  use Date::Manip;
  use C4::Date;
***************
*** 175,179 ****
  	# charge, for that matter).
  	my ($charge,$itemtype)=calc_charges($dbh,$issue->[$i]{'itemnumber'},$bornum);
! 	$row{'itemtype'}=&ItemType($itemtype);
  	$row{'charge'}= sprintf("%.2f",$charge);
  
--- 175,180 ----
  	# charge, for that matter).
  	my ($charge,$itemtype)=calc_charges($dbh,$issue->[$i]{'itemnumber'},$bornum);
! 	my $itemtypedef = getitemtypeinfo($itemtype);
! 	$row{'itemtype'}=$itemtypedef->{description};
  	$row{'charge'}= sprintf("%.2f",$charge);
  





More information about the Koha-cvs mailing list