respect part_svc labels in svc_hardware & svc_cable short service labels, RT#73405

[freeside.git] / FS / FS / Setup.pm

diff --git a/FS/FS/Setup.pm b/FS/FS/Setup.pm
index 29130fa..cac26c1 100644 (file)
--- a/FS/FS/Setup.pm
+++ b/FS/FS/Setup.pm
@@ -413,6 +413,7 @@ sub populate_access {
 
   use FS::AccessRight;
   use FS::access_right;
+  use FS::access_groupagent;
 
   foreach my $rightname ( FS::AccessRight->default_superuser_rights ) {
     my $access_right = new FS::access_right {