truncated long labels

includes/object_properties.form.inc

@@ -78,7 +78,9 @@ function islandora_object_properties_form(array $form, array &$form_state, Abstr
     'delete' => array(
       '#type' => 'submit',
       '#access' => islandora_object_access(ISLANDORA_PURGE, $object),
-      '#value' => t("Permanently remove '@label' from repository", array('@label' => $object->label)),
+      '#value' => t("Permanently remove '@label' from repository", array(
+        '@label' => truncate_utf8($object->label, 32, TRUE, TRUE))
+      ),
       '#submit' => array('islandora_object_properties_form_delete'),
       '#limit_validation_errors' => array(array('pid')),
     ),