- /*
- * Attribute has a single value, so its value just gets
- * added to the hash.
- */
- } else if (sublist) {
-
- if (sublist->da->type != PW_TYPE_STRING) {
- len = vp_prints_value(buffer, sizeof(buffer), sublist, 0);
- (void)hv_store(rad_hv, name, strlen(name), newSVpv(buffer, truncate_len(len, sizeof(buffer))), 0);
- RDEBUG("<-- %s = %s", sublist->da->name, buffer);
- } else {
- (void)hv_store(rad_hv, name, strlen(name), newSVpv(sublist->vp_strvalue, sublist->length), 0);
- RDEBUG("<-- %s = %s", sublist->da->name, sublist->vp_strvalue);
- }