[Koha-devel] CVS: koha/sec writeoff.pl,1.2,1.3

[Chris Cormack]

Update of /cvsroot/koha/koha/sec
In directory usw-pr-cvs1:/tmp/cvs-serv11400/sec

Modified Files:
	writeoff.pl 
Log Message:
Reworking statistics for payments and writeoffs


Index: writeoff.pl
===================================================================
RCS file: /cvsroot/koha/koha/sec/writeoff.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** writeoff.pl	2001/03/27 21:45:50	1.2
--- writeoff.pl	2001/04/02 22:51:26	1.3
***************
*** 46,49 ****
--- 46,52 ----
    my ($bornum,$accountnum,$itemnum,$accounttype,$amount)=@_;
    my $user=$input->remote_user;
+   $user=~ s/Levin/C/;
+   $user=~ s/Foxton/F/;
+   $user=~ s/Shannon/S/;
    my $dbh=C4Connect;
    my $env;