show location ID (if present) on wholesale agent bill, RT#30856

[freeside.git] / FS / FS / part_pkg / agent.pm

diff --git a/FS/FS/part_pkg/agent.pm b/FS/FS/part_pkg/agent.pm
index 62cf185..e24ebe1 100644 (file)
--- a/FS/FS/part_pkg/agent.pm
+++ b/FS/FS/part_pkg/agent.pm
@@ -107,6 +107,10 @@ sub calc_recur {
 
         my $pkg_details = $cust_main->name_short. ': '; #name?
 
+        my $cust_location = $cust_pkg->cust_location;
+        $pkg_details .= $cust_location->locationname. ': '
+          if $cust_location->locationname;
+
         my $part_pkg = $cust_pkg->part_pkg;
 
         # + something to identify package... primary service probably