[Koha-cvs] CVS: koha moredetail.pl,1.9,1.10
Andrew Arensburger
arensb at users.sourceforge.net
Sat Oct 5 11:46:04 CEST 2002
Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv19689
Modified Files:
moredetail.pl
Log Message:
Merged with arensb-context branch: use C4::Context->dbh instead of
&C4Connect, and generally prefer C4::Context over C4::Database.
Index: moredetail.pl
===================================================================
RCS file: /cvsroot/koha/koha/moredetail.pl,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -r1.9 -r1.10
*** moredetail.pl 14 Aug 2002 18:12:51 -0000 1.9
--- moredetail.pl 5 Oct 2002 09:46:02 -0000 1.10
***************
*** 29,58 ****
my $query=new CGI;
!
! my $language='french';
!
!
! my %configfile;
! open (KC, "/etc/koha.conf");
! while (<KC>) {
! chomp;
! (next) if (/^\s*#/);
! if (/(.*)\s*=\s*(.*)/) {
! my $variable=$1;
! my $value=$2;
! # Clean up white space at beginning and end
! $variable=~s/^\s*//g;
! $variable=~s/\s*$//g;
! $value=~s/^\s*//g;
! $value=~s/\s*$//g;
! $configfile{$variable}=$value;
! }
! }
!
! my $includes=$configfile{'includes'};
! ($includes) || ($includes="/usr/local/www/hdl/htdocs/includes");
my $templatebase="catalogue/moredetail.tmpl";
! my $startfrom=$query->param('startfrom');
! ($startfrom) || ($startfrom=0);
my $theme=picktemplate($includes, $templatebase);
--- 29,36 ----
my $query=new CGI;
! my $includes = C4::Context->config('includes') ||
! "/usr/local/www/hdl/htdocs/includes";
my $templatebase="catalogue/moredetail.tmpl";
! my $startfrom=$query->param('startfrom') || 0;
my $theme=picktemplate($includes, $templatebase);
***************
*** 110,113 ****
--- 88,92 ----
$item->{'booksellerinvoicenumber'} = $order->{'booksellerinvoicenumber'};
+ # FIXME - This should be "==", not "=", right?
if ($item->{'date_due'} = 'Available'){
$item->{'issue'}="<b>Available</b><br>";
More information about the Koha-cvs
mailing list