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 -N -r1.7.2.237 -r1.7.2.238 --- openacs-4/packages/xowf/tcl/test-item-procs.tcl 10 Aug 2022 07:58:01 -0000 1.7.2.237 +++ openacs-4/packages/xowf/tcl/test-item-procs.tcl 13 Aug 2022 17:01:37 -0000 1.7.2.238 @@ -3288,14 +3288,14 @@ foreach composite_grading_box $composite_grading_boxes { set composite_qn [$composite_grading_box getAttribute "data-question_name"] set parentNode [$composite_grading_box parentNode] - :dom class add $composite_grading_box {.} hidden + :dom class add $composite_grading_box {.} [::xowiki::CSS class d-none] foreach grading_box [$parentNode selectNodes {div//div[contains(@class,'grading-box')]}] { set qn [$grading_box getAttribute data-question_name] regsub {^answer_} $qn ${composite_qn}_ new_qn #ns_log notice "CHILD of Composite: rename QN from $qn to $new_qn" $grading_box setAttribute data-question_name $new_qn $grading_box setAttribute id ${composite_qn}_[$grading_box getAttribute id] - :dom class remove $grading_box {.} hidden + :dom class remove $grading_box {.} [::xowiki::CSS class d-none] # # The composite questions are prerendered and do not have # hint boxes, since we do not want to have even hidden in @@ -3325,6 +3325,7 @@ # # Probably some legacy item # + ::util_user_message -message "Composite Exercise looks like legacy data; please edit+save" ad_log warning "composite_grading_box has no data-question_id" } } @@ -3345,7 +3346,8 @@ "submission state $submission_state" \ "exam state $exam_state noManualGrading $noManualGrading" if {$noManualGrading} { - :dom class add $grading_box {a[contains(@class,'manual-grade')]} hidden + :dom class add $grading_box {a[contains(@class,'manual-grade')]} \ + [::xowiki::CSS class d-none] } # @@ -3394,9 +3396,11 @@ # :dom node replace $grading_box {span[@class='comment']} {::html::t $comment} if {$comment eq ""} { - :dom class add $grading_box {span[@class='feedback-label']} hidden + :dom class add $grading_box {span[@class='feedback-label']} \ + [::xowiki::CSS class d-none] } else { - :dom class remove $grading_box {span[@class='feedback-label']} hidden + :dom class remove $grading_box {span[@class='feedback-label']} \ + [::xowiki::CSS class d-none] } $grading_box setAttribute data-user_id [$submission creation_user] Index: openacs-4/packages/xowiki/tcl/package-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v diff -u -N -r1.332.2.117 -r1.332.2.118 --- openacs-4/packages/xowiki/tcl/package-procs.tcl 22 Jun 2022 17:48:38 -0000 1.332.2.117 +++ openacs-4/packages/xowiki/tcl/package-procs.tcl 13 Aug 2022 17:01:36 -0000 1.332.2.118 @@ -106,6 +106,7 @@ card "panel panel-default" card-header panel-heading card-body panel-body + d-none hidden } ::xowiki::formfield::FormField parameter [subst { {CSSclass form-control}