]> git.ipfire.org Git - thirdparty/freeradius-server.git/commitdiff
Only FR_TYPE_STRUCT need sorted children
authorNick Porter <nick@portercomputing.co.uk>
Tue, 24 Sep 2024 11:05:50 +0000 (12:05 +0100)
committerNick Porter <nick@portercomputing.co.uk>
Tue, 24 Sep 2024 11:05:50 +0000 (12:05 +0100)
src/modules/rlm_perl/rlm_perl.c

index 0e798bf261fd995ef54b50b00d70338bafce3077..376354d83c641a8e972de243b8460fb991d95f7e 100644 (file)
@@ -780,7 +780,7 @@ static int pairadd_sv(TALLOC_CTX *ctx, request_t *request, fr_pair_list_t *vps,
                }
                hv = (HV *)SvRV(sv);
                if (get_hv_content(vp, request, hv, &vp->vp_group, list_name, da, false) < 0) goto fail;
-               fr_pair_list_sort(&vp->vp_group, fr_pair_cmp_by_da);
+               if (vp->vp_type == FR_TYPE_STRUCT) fr_pair_list_sort(&vp->vp_group, fr_pair_cmp_by_da);
        }
                break;