name management tweaking

diff --git a/FS/FS/part_export/prizm.pm b/FS/FS/part_export/prizm.pm
index a8ea02a..53638b4 100644 (file)
--- a/FS/FS/part_export/prizm.pm
+++ b/FS/FS/part_export/prizm.pm
@@ -141,7 +141,8 @@ sub _export_insert {
   $err_or_som = $self->prizm_command('NetworkIfService', 'addProvisionedElement',
                                       $networkid,
                                       $svc->mac_addr,
-                                      $name, # we fix this below (bug in prizm?)
+                                      substr($name . " " . $svc->description
+                                             0, 50),
                                       $location,
                                       $contact,
                                       sprintf("%032X", $svc->authkey),