[Koha-cvs] CVS: koha/C4/Circulation Circ2.pm,1.49,1.50

[Ambrose Li]

Update of /cvsroot/koha/koha/C4/Circulation
In directory sc8-pr-cvs1:/tmp/cvs-serv6503/C4/Circulation

Modified Files:
	Circ2.pm 
Log Message:
Changed the 3 "this does nothing" lines to set the flag. Is this right?


Index: Circ2.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Circulation/Circ2.pm,v
retrieving revision 1.49
retrieving revision 1.50
diff -C2 -r1.49 -r1.50
*** Circ2.pm	5 Feb 2003 06:28:56 -0000	1.49
--- Circ2.pm	5 Feb 2003 07:55:42 -0000	1.50
***************
*** 1029,1039 ****
      if ($doreturn) {
  	doreturn($borrower->{'borrowernumber'}, $iteminformation->{'itemnumber'});
! 	$messages->{'WasReturned'};	# FIXME - This does nothing
      }
      ($borrower) = getpatroninformation(\%env, $currentborrower, 0);
  # transfer book to the current branch
      my ($transfered, $mess, $item) = transferbook($branch, $barcode, 1);
!     if ($transfered) {	# FIXME - perl -wc complains about this line.
! 	$messages->{'WasTransfered'};	# FIXME - This does nothing
      }
  # fix up the accounts.....
--- 1029,1039 ----
      if ($doreturn) {
  	doreturn($borrower->{'borrowernumber'}, $iteminformation->{'itemnumber'});
! 	$messages->{'WasReturned'} = 1; # FIXME is the "= 1" right?
      }
      ($borrower) = getpatroninformation(\%env, $currentborrower, 0);
  # transfer book to the current branch
      my ($transfered, $mess, $item) = transferbook($branch, $barcode, 1);
!     if ($transfered) {
! 	$messages->{'WasTransfered'} = 1; # FIXME is the "= 1" right?
      }
  # fix up the accounts.....
***************
*** 1042,1046 ****
  	updateitemlost($iteminformation->{'itemnumber'});
  	fixaccountforlostandreturned($iteminformation, $borrower);
! 	$messages->{'WasLost'};		# FIXME - This does nothing
      }
  # fix up the overdues in accounts...
--- 1042,1046 ----
  	updateitemlost($iteminformation->{'itemnumber'});
  	fixaccountforlostandreturned($iteminformation, $borrower);
! 	$messages->{'WasLost'} = 1; # FIXME is the "= 1" right?
      }
  # fix up the overdues in accounts...