[freeside-commits] branch master updated. ccba8f1b1379e45176c51733bb2fd451426d950a

Ivan ivan at 420.am
Sun Aug 10 13:43:49 PDT 2014


The branch, master has been updated
       via  ccba8f1b1379e45176c51733bb2fd451426d950a (commit)
      from  918b627555b7fbce548a21aa1e46b686505c3930 (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 ccba8f1b1379e45176c51733bb2fd451426d950a
Author: Ivan Kohler <ivan at freeside.biz>
Date:   Sun Aug 10 13:43:47 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(-)




More information about the freeside-commits mailing list