Index: openacs-4/packages/xowf/lib/inclass-exam.wf
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/lib/inclass-exam.wf,v
diff -u -r1.1.2.98 -r1.1.2.99
--- openacs-4/packages/xowf/lib/inclass-exam.wf	13 Aug 2022 13:54:16 -0000	1.1.2.98
+++ openacs-4/packages/xowf/lib/inclass-exam.wf	13 Aug 2022 14:00:38 -0000	1.1.2.99
@@ -286,8 +286,10 @@
     set menu "<ul class='list-group list-group-flush'>\n"
     dict for {name d} $md {
       set href [[dict get $d obj] pretty_link -query m=[dict get $d m]]
-      append menu "<li class='list-group-item $link_disabled' href='[ns_quotehtml $href]'>" \
-          "<adp:icon name='[dict get $d icon]'> [ns_quotehtml [dict get $d label]]</li>\n"
+      append menu "<li class='list-group-item $link_disabled'>" \
+          "<a href='[ns_quotehtml $href]'>" \
+          "<adp:icon name='[dict get $d icon]'> " \
+          "[ns_quotehtml [dict get $d label]]</a></li>\n"
     }
     append menu "</ul>\n"
   }