Permalink
Browse files

Merge pull request #191 from hgq/16_01_pt17425237_4_08

16 01 pt17425237 4 08
  • Loading branch information...
ctfliblime committed Sep 30, 2011
2 parents c349c16 + 4f4ae10 commit cbd401135b920b78879437a648b52f31ecc9cba2
Showing with 2 additions and 1 deletion.
  1. +2 −1 C4/Circulation.pm
View
@@ -2295,7 +2295,8 @@ sub _checkinDescFine
{
my $desc = $_[3]? 'checkin as lost' : $_[4];
return C4::Context->dbh->do("UPDATE accountlines
- SET description = CONCAT(description, ', $desc $_[2]')
+ SET description = CONCAT(description, ', $desc $_[2]'),
+ accounttype = 'F'
WHERE borrowernumber = ?
AND accountno = ?",undef,$_[0],$_[1]
);

0 comments on commit cbd4011

Please sign in to comment.