[freeside-commits] branch FREESIDE_3_BRANCH updated. 2f4da8767b73891ec097d86aab0d7dc80b331c1c

[Ivan]

The branch, FREESIDE_3_BRANCH has been updated
       via  2f4da8767b73891ec097d86aab0d7dc80b331c1c (commit)
      from  840bcad433cff431da71fbb001092d2605d09f13 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 2f4da8767b73891ec097d86aab0d7dc80b331c1c
Author: Ivan Kohler <ivan at freeside.biz>
Date:   Sun Aug 10 13:43:50 2014 -0700

    quiet overzealous debugging

diff --git a/FS/FS/cust_main_Mixin.pm b/FS/FS/cust_main_Mixin.pm
index 769b049..40c0ae9 100644
--- a/FS/FS/cust_main_Mixin.pm
+++ b/FS/FS/cust_main_Mixin.pm
@@ -2,7 +2,7 @@ package FS::cust_main_Mixin;
 
 use strict;
 use vars qw( $DEBUG $me );
-use Carp qw( confess );
+use Carp qw( confess carp cluck );
 use FS::UID qw(dbh);
 use FS::cust_main;
 use FS::Record qw( qsearch qsearchs );
@@ -38,6 +38,7 @@ sub cust_linked { $_[0]->custnum; }
 
 sub cust_main { 
   my $self = shift;
+  cluck ref($self). '->cust_main called' if $DEBUG;
   $self->cust_linked ? qsearchs('cust_main', {custnum => $self->custnum}) : '';
 }
 

-----------------------------------------------------------------------

Summary of changes:
 FS/FS/cust_main_Mixin.pm |    3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)