[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/opac opac-userupdate.pl,1.7,1.8
From: |
Ambrose Li |
Subject: |
[Koha-cvs] CVS: koha/opac opac-userupdate.pl,1.7,1.8 |
Date: |
Mon, 03 Feb 2003 22:01:56 -0800 |
Update of /cvsroot/koha/koha/opac
In directory sc8-pr-cvs1:/tmp/cvs-serv15797/opac
Modified Files:
opac-userupdate.pl
Log Message:
Sync to same file in 1.2 branch
Index: opac-userupdate.pl
===================================================================
RCS file: /cvsroot/koha/koha/opac/opac-userupdate.pl,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -r1.7 -r1.8
*** opac-userupdate.pl 2 Feb 2003 07:18:38 -0000 1.7
--- opac-userupdate.pl 4 Feb 2003 06:01:52 -0000 1.8
***************
*** 6,9 ****
--- 6,10 ----
use C4::Auth; # checkauth, getborrowernumber.
+ use C4::Context;
use C4::Koha;
use C4::Circulation::Circ2;
***************
*** 30,34 ****
my @fields = ('title', 'surname', 'firstname', 'phone', 'faxnumber',
'streetaddress', 'emailaddress', 'city');
my $update;
! my $updateemailaddress = "address@hidden"; #Will have to change this!
!!!!!!!!!!!!!!!!!!!
if ($query->{'title'}) {
# get all the fields:
--- 31,46 ----
my @fields = ('title', 'surname', 'firstname', 'phone', 'faxnumber',
'streetaddress', 'emailaddress', 'city');
my $update;
! my $updateemailaddress= C4::Context->preference('KohaAdminEmailAddress');
! if ($updateemailaddress eq '') {
! warn "KohaAdminEmailAddress system preference not set. Couldn't send
patron update information for $borr->{'firstname'} $borr->{'surname'}
(#$borrowernumber)\n";
! my $template = gettemplate("kohaerror.tmpl", "opac");
!
! $template->param(errormessage => 'KohaAdminEmailAddress system preference
! is not set. Please visit the library to update your user record');
!
! print $query->header(), $template->output;
! exit;
! }
!
if ($query->{'title'}) {
# get all the fields:
***************
*** 51,54 ****
--- 63,67 ----
warn "Mail sent ok\n";
print $query->redirect('/cgi-bin/koha/opac-user.pl');
+ exit;
} else {
# do something if it doesnt work....
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/opac opac-userupdate.pl,1.7,1.8,
Ambrose Li <=
- Prev by Date:
[Koha-cvs] CVS: koha/koha-tmpl/intranet-tmpl/default/zh-TW/images modify-user-flags.gif,NONE,1.1 modify-user-flags.xcf,NONE,1.1 password-mem.gif,NONE,1.1 password-mem.xcf,NONE,1.1
- Next by Date:
[Koha-cvs] CVS: koha/misc Install.pm,1.27,1.28
- Previous by thread:
[Koha-cvs] CVS: koha/koha-tmpl/intranet-tmpl/default/zh-TW/images modify-user-flags.gif,NONE,1.1 modify-user-flags.xcf,NONE,1.1 password-mem.gif,NONE,1.1 password-mem.xcf,NONE,1.1
- Next by thread:
[Koha-cvs] CVS: koha/misc Install.pm,1.27,1.28
- Index(es):