Index: openacs-4/packages/xooauth/tcl/oauth-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xooauth/tcl/Attic/oauth-procs.tcl,v
diff -u -N -r1.1.2.5 -r1.1.2.6
--- openacs-4/packages/xooauth/tcl/oauth-procs.tcl	18 Apr 2021 18:10:42 -0000	1.1.2.5
+++ openacs-4/packages/xooauth/tcl/oauth-procs.tcl	13 Sep 2022 09:38:32 -0000	1.1.2.6
@@ -21,11 +21,15 @@
 namespace eval ::xo {}
 namespace eval ::xo::oauth {
 
-  ad_proc nonce {} {} {
+  ad_proc nonce {} {
+    @return a nonce for the current request.
+  } {
     return [ad_generate_random_string 33]
   }
 
-  ad_proc timestamp {} {} {
+  ad_proc timestamp {} {
+    @return the current epoch timestamp in seconds
+  } {
     return [clock seconds]
   }