Index: openacs-4/packages/xooauth/tcl/authorize-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xooauth/tcl/authorize-procs.tcl,v
diff -u -r1.1.2.9 -r1.1.2.10
--- openacs-4/packages/xooauth/tcl/authorize-procs.tcl	25 May 2023 09:39:29 -0000	1.1.2.9
+++ openacs-4/packages/xooauth/tcl/authorize-procs.tcl	26 Sep 2023 14:46:41 -0000	1.1.2.10
@@ -155,7 +155,9 @@
             set fields {}
             foreach pair $mapped_fields {
                 lassign $pair field target
-                dict set fields $target [dict get $claims $field]
+                if {[dict exists $claims $field]} {
+                    dict set fields $target [dict get $claims $field]
+                }
             }
             dict set result fields $fields
             foreach field [:required_fields] {
@@ -169,7 +171,8 @@
 
             if {[info exists not_enough_data]} {
                 ns_log warning "[self] get_user_data: not enough data:" \
-                    $not_enough_data "is missing"
+                    $not_enough_data "is missing" \
+                    "($field -> $target, claims: $claims)"
                 dict set result error oacs-not_enough_data
             }
             return $result