CVS head rlm_perl error

17 Apr 2007

Trying to test the latest changes to the CVS head and the build process fails 
with an error in rlm_perl.  Patch is below.

Kevin Bonner


diff -u -r1.50 rlm_perl.c

--- src/modules/rlm_perl/rlm_perl.c     17 Apr 2007 13:14:54 -0000      1.50
+++ src/modules/rlm_perl/rlm_perl.c     17 Apr 2007 14:57:18 -0000
@@ -1124,7 +1124,7 @@
        int             acctstatustype=0;

        if ((pair = pairfind(request->packet->vps, PW_ACCT_STATUS_TYPE)) != 
NULL) {
-                acctstatustype = pair->vp_integer
+                acctstatustype = pair->vp_integer;
         } else {
                 radlog(L_ERR, "Invalid Accounting Packet");
                 return RLM_MODULE_INVALID;

    