[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha userpage.pl,1.3,1.3.2.1
From: |
Andrew Arensburger |
Subject: |
[Koha-cvs] CVS: koha userpage.pl,1.3,1.3.2.1 |
Date: |
Thu, 03 Oct 2002 19:52:20 -0700 |
Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv26030
Modified Files:
Tag: arensb-context
userpage.pl
Log Message:
Use C4::Connect instead of C4::Database, C4::Connect->dbh instead
C4Connect.
Removed old code for reading /etc/koha.conf.
Index: userpage.pl
===================================================================
RCS file: /cvsroot/koha/koha/userpage.pl,v
retrieving revision 1.3
retrieving revision 1.3.2.1
diff -C2 -r1.3 -r1.3.2.1
*** userpage.pl 14 Aug 2002 18:12:51 -0000 1.3
--- userpage.pl 4 Oct 2002 02:52:18 -0000 1.3.2.1
***************
*** 21,25 ****
use strict;
require Exporter;
! use C4::Database;
use C4::Output; # contains picktemplate
use CGI;
--- 21,25 ----
use strict;
require Exporter;
! use C4::Context;
use C4::Output; # contains picktemplate
use CGI;
***************
*** 28,56 ****
my $query=new CGI;
! my ($loggedinuser, $cookie, $sessionID) = checkauth($query);
!
!
! 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="user/userpage.tmpl";
my $theme=picktemplate($includes, $templatebase);
--- 28,35 ----
my $query=new CGI;
! my ($loggedinuser, $cookie, $sessionID) = checkauth($query, 1);
! my $includes = C4::Context->config('includes') ||
! "/usr/local/www/hdl/htdocs/includes";
my $templatebase="user/userpage.tmpl";
my $theme=picktemplate($includes, $templatebase);
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha userpage.pl,1.3,1.3.2.1,
Andrew Arensburger <=