From 2c3d4dac5b3e159a7e5bd4df457db5f148340a31 Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Sat, 25 Oct 2014 12:21:07 -0700
Subject: [PATCH] show location ID (if present) on wholesale agent bill,
 RT#30856

---
 FS/FS/part_pkg/agent.pm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/FS/FS/part_pkg/agent.pm b/FS/FS/part_pkg/agent.pm
index 62cf185ed..e24ebe11e 100644
--- 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
-- 
2.11.0