[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/members member-flags.pl member-password.pl
From: |
paul poulain |
Subject: |
[Koha-cvs] koha/members member-flags.pl member-password.pl |
Date: |
Tue, 17 Apr 2007 08:49:30 +0000 |
CVSROOT: /sources/koha
Module name: koha
Changes by: paul poulain <tipaul> 07/04/17 08:49:30
Modified files:
members : member-flags.pl member-password.pl
Log message:
circulation cleaning continued: bufixing
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/members/member-flags.pl?cvsroot=koha&r1=1.7&r2=1.8
http://cvs.savannah.gnu.org/viewcvs/koha/members/member-password.pl?cvsroot=koha&r1=1.6&r2=1.7
Patches:
Index: member-flags.pl
===================================================================
RCS file: /sources/koha/koha/members/member-flags.pl,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -b -r1.7 -r1.8
--- member-flags.pl 4 Apr 2007 16:46:23 -0000 1.7
+++ member-flags.pl 17 Apr 2007 08:49:30 -0000 1.8
@@ -10,7 +10,7 @@
use C4::Output;
use C4::Auth;
use C4::Context;
-use C4::Circulation;
+use C4::Members;
#use C4::Acquisitions;
use C4::Interface::CGI::Output;
@@ -38,11 +38,6 @@
$env{'nottodayissues'}=1;
my %member2;
$member2{'borrowernumber'}=$member;
-my $issues=GetBorrowerIssues(\%member2);
-my $i=0;
-foreach (sort keys %$issues) {
- $i++;
-}
if ($input->param('newflags')) {
my $dbh=C4::Context->dbh();
Index: member-password.pl
===================================================================
RCS file: /sources/koha/koha/members/member-password.pl,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- member-password.pl 4 Apr 2007 16:46:23 -0000 1.6
+++ member-password.pl 17 Apr 2007 08:49:30 -0000 1.7
@@ -38,11 +38,11 @@
$env{'nottodayissues'}=1;
my %member2;
$member2{'borrowernumber'}=$member;
-my $issues=GetBorrowerIssues(\%member2);
-my $i=0;
-foreach (sort keys %$issues) {
- $i++;
-}
+# my $issues=GetBorrowerIssues(\%member2);
+# my $i=0;
+# foreach (sort keys %$issues) {
+# $i++;
+# }
my ($bor,$flags)=GetMemberDetails( $member,'');
my $newpassword = $input->param('newpassword');
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] koha/members member-flags.pl member-password.pl,
paul poulain <=