From: ivan <ivan>
Date: Mon, 21 Nov 2005 15:24:39 +0000 (+0000)
Subject: when editing exports and there's a duplicate error, show all conflicting accounts... 
X-Git-Tag: BEFORE_FINAL_MASONIZE~292
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=c934eb18a66126faab43459780940bfdb19b30ad

when editing exports and there's a duplicate error, show all conflicting accounts not just the ones for different customers
---

diff --git a/FS/FS/export_svc.pm b/FS/FS/export_svc.pm
index e5c7ed8db..0370f5f0b 100644
--- a/FS/FS/export_svc.pm
+++ b/FS/FS/export_svc.pm
@@ -198,8 +198,8 @@ sub insert {
                  ' on '. $self->part_export->machine.
                ' : '. scalar(@dup_svc). " duplicate $label".
                ' ('. scalar(@diff_customer_svc). " from different customers)".
-               #": ". join(', ', sort $sortby map { $_->$method() } @dup_svc )
-               ": ". join(', ', sort $sortby map { $_->$method() } @diff_customer_svc )
+               ": ". join(', ', sort $sortby map { $_->$method() } @dup_svc )
+               #": ". join(', ', sort $sortby map { $_->$method() } @diff_customer_svc )
                ;
       }
   
diff --git a/FS/FS/part_svc.pm b/FS/FS/part_svc.pm
index d3073f951..1a478a9cd 100644
--- a/FS/FS/part_svc.pm
+++ b/FS/FS/part_svc.pm
@@ -562,7 +562,7 @@ sub process {
     $param->{'svcpart'} = $new->getfield('svcpart');
   }
 
-  die $error if $error;
+  die "$error\n" if $error;
 }
 
 =item process_bulk_cust_svc
diff --git a/FS/FS/rate.pm b/FS/FS/rate.pm
index f19ebf002..a471e2ea4 100644
--- a/FS/FS/rate.pm
+++ b/FS/FS/rate.pm
@@ -363,7 +363,7 @@ sub process {
     #$ratenum = $rate->getfield('ratenum');
   }
 
-  die $error if $error;
+  die "$error\n" if $error;
 
 }