Index: openacs-4/packages/xotcl-core/tcl/policy-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/policy-procs.tcl,v
diff -u -r1.29.2.16 -r1.29.2.17
--- openacs-4/packages/xotcl-core/tcl/policy-procs.tcl	22 Feb 2022 17:25:42 -0000	1.29.2.16
+++ openacs-4/packages/xotcl-core/tcl/policy-procs.tcl	9 Mar 2022 13:44:33 -0000	1.29.2.17
@@ -132,7 +132,7 @@
         ad_log error "get_permission could not find an approriate class for checking" \
             "permissions for '$object' and '$method' in policy [self]" \
             "using the class hierarchy [concat $c [$c info heritage]]"
-        set set permission ""
+        set permission ""
       }
     }
     return $permission