From 0c1c897c18f14ba74521b373732a953d59b3796f Mon Sep 17 00:00:00 2001 From: Marcus Kammer Date: Sat, 11 Jan 2025 10:37:56 +0100 Subject: [PATCH] Set ID for grading table accordion --- src/assessment/sus.lisp | 29 ++++++++++++++--------------- 1 file changed, 14 insertions(+), 15 deletions(-) diff --git a/src/assessment/sus.lisp b/src/assessment/sus.lisp index 3b86cc7..5419cb8 100644 --- a/src/assessment/sus.lisp +++ b/src/assessment/sus.lisp @@ -38,21 +38,20 @@ (defmethod displayer-generate-html ((disp sus-displayer) results &optional group-stats survey-id) (with-section (with-title-bar (format nil "~A" (displayer-name disp))) - (with-accordion - (:id "sus-grading-table") - "Grading Table" - (ml-sbt/tbl:render-tbl '("Score Range" "Grade" "Percentile range") - '(("84.1-100" "A+" "96-100") - ("80.8-84.0" "A" "90-95") - ("78.9-80.7" "A-" "85-89") - ("77.2-78.8" "B+" "80-84") - ("74.1-77.1" "B" "70-79") - ("72.6-74.0" "B-" "65-69") - ("71.1-72.5" "C+" "60-64") - ("65.0-71.0" "C" "41-59") - ("62.7-64.9" "C-" "35-40") - ("51.7-62.6" "D" "15-34") - ("0.0-51.6" "F" "0-14")))) + (with-accordion (:id "sus-grading-table") + "Grading Table" + (ml-sbt/tbl:render-tbl '("Score Range" "Grade" "Percentile range") + '(("84.1-100" "A+" "96-100") + ("80.8-84.0" "A" "90-95") + ("78.9-80.7" "A-" "85-89") + ("77.2-78.8" "B+" "80-84") + ("74.1-77.1" "B" "70-79") + ("72.6-74.0" "B-" "65-69") + ("71.1-72.5" "C+" "60-64") + ("65.0-71.0" "C" "41-59") + ("62.7-64.9" "C-" "35-40") + ("51.7-62.6" "D" "15-34") + ("0.0-51.6" "F" "0-14")))) (:div :class "row" (with-section-col (with-title-bar "Results"