Index: openacs-4/packages/xooauth/tcl/oauth-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xooauth/tcl/oauth-procs.tcl,v
diff -u -r1.1.2.7 -r1.1.2.8
--- openacs-4/packages/xooauth/tcl/oauth-procs.tcl	1 Nov 2022 16:17:14 -0000	1.1.2.7
+++ openacs-4/packages/xooauth/tcl/oauth-procs.tcl	29 Nov 2022 12:39:55 -0000	1.1.2.8
@@ -237,6 +237,7 @@
 
   Signature instproc normalize_parameters {} {
     set parameter_pair_list [:signature_parameters]
+    set encoded_parameter_pair_list {}
     foreach pair $parameter_pair_list {
       lassign $pair key value
       if {[string match "*secret" $key]} continue