From 33cf0327e669dc03e9a33273eb082dd821d43347 Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Mon, 24 Jul 2017 23:58:38 -0700
Subject: [PATCH] backport API_getinfo, RT#76831

---
 FS/FS/cust_svc.pm | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/FS/FS/cust_svc.pm b/FS/FS/cust_svc.pm
index 511fcf32e..1390f0750 100644
--- a/FS/FS/cust_svc.pm
+++ b/FS/FS/cust_svc.pm
@@ -1079,6 +1079,13 @@ sub tickets {
   (@tickets);
 }
 
+sub API_getinfo {
+  my $self = shift;
+  my $svc_x = $self->svc_x;
+ +{ ( map { $_=>$self->$_ } $self->fields ),
+    ( map { $svc_x=>$svc_x->$_ } $svc_x->fields ),
+  };
+}
 
 =back
 
-- 
2.11.0