[freeside-commits] freeside/FS/FS otaker_Mixin.pm,1.7,1.7.2.1

[Erik Levinson]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv17070/FS/FS

Modified Files:
      Tag: FREESIDE_2_1_BRANCH
	otaker_Mixin.pm 
Log Message:
upgrade optimizations for space-constrained installs, RT10071

Index: otaker_Mixin.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/otaker_Mixin.pm,v
retrieving revision 1.7
retrieving revision 1.7.2.1
diff -u -w -d -r1.7 -r1.7.2.1
--- otaker_Mixin.pm	18 Sep 2010 15:57:52 -0000	1.7
+++ otaker_Mixin.pm	23 Jan 2011 22:04:31 -0000	1.7.2.1
@@ -4,6 +4,7 @@
 use Carp qw( croak ); #confess );
 use FS::Record qw( qsearch qsearchs );
 use FS::access_user;
+use FS::UID qw( dbh );
 
 sub otaker {
   my $self = shift;
@@ -77,6 +78,11 @@
       die $error if $error;
     }
 
+    if ( $table eq 'cust_attachment' ) {
+	warn "  committing (cust_attachment) \n";
+	dbh->commit or die dbh->errstr;
+    }
+
   }
 
 }