marcuskammer/dev.metalisp.qmetrics
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Set ID for grading table accordion

Browse source
This commit is contained in:
Marcus Kammer 2025-01-11 10:37:56 +01:00
parent 905067fcb0
commit 0c1c897c18
Signed by: marcuskammer
GPG key ID: C374817BE285268F
1 changed files with 14 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

29
src/assessment/sus.lisp
View file

@ -38,21 +38,20 @@
(defmethod displayer-generate-html ((disp sus-displayer) results &optional group-stats survey-id) (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-section (with-title-bar (format nil "~A" (displayer-name disp)))
(with-accordion (with-accordion (:id "sus-grading-table")
(:id "sus-grading-table") "Grading Table"
"Grading Table" (ml-sbt/tbl:render-tbl '("Score Range" "Grade" "Percentile range")
(ml-sbt/tbl:render-tbl '("Score Range" "Grade" "Percentile range") '(("84.1-100" "A+" "96-100")
'(("84.1-100" "A+" "96-100") ("80.8-84.0" "A" "90-95")
("80.8-84.0" "A" "90-95") ("78.9-80.7" "A-" "85-89")
("78.9-80.7" "A-" "85-89") ("77.2-78.8" "B+" "80-84")
("77.2-78.8" "B+" "80-84") ("74.1-77.1" "B" "70-79")
("74.1-77.1" "B" "70-79") ("72.6-74.0" "B-" "65-69")
("72.6-74.0" "B-" "65-69") ("71.1-72.5" "C+" "60-64")
("71.1-72.5" "C+" "60-64") ("65.0-71.0" "C" "41-59")
("65.0-71.0" "C" "41-59") ("62.7-64.9" "C-" "35-40")
("62.7-64.9" "C-" "35-40") ("51.7-62.6" "D" "15-34")
("51.7-62.6" "D" "15-34") ("0.0-51.6" "F" "0-14"))))
("0.0-51.6" "F" "0-14"))))
(:div :class "row" (:div :class "row"
(with-section-col (with-section-col
(with-title-bar "Results" (with-title-bar "Results"