[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/members member-flags.pl,1.1,1.2
From: |
Owen Leonard |
Subject: |
[Koha-cvs] CVS: koha/members member-flags.pl,1.1,1.2 |
Date: |
Thu, 08 Apr 2004 09:10:15 -0700 |
Update of /cvsroot/koha/koha/members
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13402/members
Modified Files:
member-flags.pl
Log Message:
Fixing redirect to moremember.pl
Index: member-flags.pl
===================================================================
RCS file: /cvsroot/koha/koha/members/member-flags.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -r1.1 -r1.2
*** member-flags.pl 10 Mar 2004 15:13:45 -0000 1.1
--- member-flags.pl 8 Apr 2004 16:10:13 -0000 1.2
***************
*** 57,61 ****
my $sth=$dbh->prepare("update borrowers set flags=? where
borrowernumber=?");
$sth->execute($flags, $member);
! print $input->redirect("/cgi-bin/koha/moremember.pl?bornum=$member");
} else {
my ($bor,$flags,$accessflags)=getpatroninformation(\%env, $member,'');
--- 57,61 ----
my $sth=$dbh->prepare("update borrowers set flags=? where
borrowernumber=?");
$sth->execute($flags, $member);
! print
$input->redirect("/cgi-bin/koha/members/moremember.pl?bornum=$member");
} else {
my ($bor,$flags,$accessflags)=getpatroninformation(\%env, $member,'');
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/members member-flags.pl,1.1,1.2,
Owen Leonard <=