Index: openacs-4/packages/xowf/tcl/test-item-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/test-item-procs.tcl,v
diff -u -r1.7.2.272 -r1.7.2.273
--- openacs-4/packages/xowf/tcl/test-item-procs.tcl	2 Mar 2023 10:54:03 -0000	1.7.2.272
+++ openacs-4/packages/xowf/tcl/test-item-procs.tcl	6 Mar 2023 12:46:28 -0000	1.7.2.273
@@ -1758,7 +1758,7 @@
     #----------------------------------------------------------------------
     :public method waiting_room_message {obj:object} {
       #
-      # Renders the waiting room message, including the javascript
+      # Renders the waiting room message, including the JavaScript
       # reacting to actions from the backend.
       #
       set message [::xowiki::bootstrap::card \
@@ -4366,7 +4366,10 @@
         set participant [acs_user::get_element -user_id $user_id -element username]
         foreach qn [dict keys [dict get $results_dict $user_id]] {
           set achievable [dict get $results_dict $user_id $qn achievable]
-          set achieved [dict get $results_dict $user_id $qn achieved]
+          set achieved [:dict_value [:dict_value $manual_grading $qn] achieved]
+          if {$achieved eq ""} {
+            set achieved [dict get $results_dict $user_id $qn achieved]
+          }
           $table add \
               -participant $participant \
               -question [string trimright $qn _] \