Index: openacs-4/packages/xooauth/tcl/ms-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xooauth/tcl/Attic/ms-procs.tcl,v
diff -u -r1.1.2.18 -r1.1.2.19
--- openacs-4/packages/xooauth/tcl/ms-procs.tcl	9 May 2023 10:03:56 -0000	1.1.2.18
+++ openacs-4/packages/xooauth/tcl/ms-procs.tcl	9 May 2023 17:29:33 -0000	1.1.2.19
@@ -1129,7 +1129,7 @@
             set response_type ${:response_type}
             set nonce [::xo::oauth::nonce]
             set response_mode form_post
-            set redirect_uri "[ad_url]${:responder_url}"
+            set redirect_uri [:qualifed ${:responder_url}]
             
             return [export_vars -no_empty -base $base {                
                 client_id response_type redirect_uri response_mode
@@ -1146,7 +1146,7 @@
             # redirects to the given page.
             #
             set base https://login.microsoftonline.com/common/oauth2/logout
-            set post_logout_redirect_uri [ad_url]$page
+            set post_logout_redirect_uri [:qualified $page]
             return [export_vars -no_empty -base $base {
                 post_logout_redirect_uri
             }]