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.22 -r1.1.2.23
--- openacs-4/packages/xooauth/tcl/ms-procs.tcl	19 May 2023 18:27:27 -0000	1.1.2.22
+++ openacs-4/packages/xooauth/tcl/ms-procs.tcl	25 May 2023 09:13:42 -0000	1.1.2.23
@@ -1080,14 +1080,17 @@
 
     ###########################################################
     #
-    # ms::Authorize class:
+    # ms::Authorize class
     #
-    # Support for the Microsoft Microsoft identity platform ID
-    # tokens to login/logout via MS Azure accounts.
-    # https://learn.microsoft.com/en-us/azure/active-directory/develop/id-tokens
     ###########################################################
 
     nx::Class create ::ms::Authorize -superclasses ::xo::Authorize {
+        #
+        # Support for the Microsoft Microsoft identity platform ID
+        # tokens to login/logout via MS Azure accounts.
+        # https://learn.microsoft.com/en-us/azure/active-directory/develop/id-tokens
+        #
+
         :property {pretty_name "Azure"}
         :property {tenant}
         :property {version ""}