; * src/fileio.c (Fset_file_acl): Don't leak memory.

diff --git a/src/fileio.c b/src/fileio.c
index 9294ea3e7d6a5fe8d80d44e1ea93b0f3064247d2..fc9b04678f5e81bf80d2d0b3da846d678e74baea 100644 (file)
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -3617,10 +3617,10 @@ support.  */)
       fail = (acl_set_file (SSDATA (encoded_absname), ACL_TYPE_ACCESS,
                            acl)
              != 0);
+      acl_free (acl);
       if (fail && acl_errno_valid (errno))
        report_file_error ("Setting ACL", absname);
 
-      acl_free (acl);
       return fail ? Qnil : Qt;
     }
 # endif