# HG changeset patch
# User Uwe Brauer <address@hidden>
# Date 1579606404 -3600
#      Tue Jan 21 12:33:24 2020 +0100
# Node ID 55804f5af22ac6b118d4cf7e23b034572bf59ed0
# Parent  daa699562d03ef0423a49cfd067dc36ae3bea928
Update exam: support for checkboxes, choices etc

* style/exam.el ("exam"): Add support for checkboxes, choices etc

diff -r daa699562d03 -r 55804f5af22a style/exam.el
--- a/style/exam.el	Sat Jan 18 23:38:39 2020 +0100
+++ b/style/exam.el	Tue Jan 21 12:33:24 2020 +0100
@@ -56,6 +56,14 @@
           "question")
          ((string= environment "parts")
           "part")
+         ((string= environment "choices")
+          "choice")
+         ((string= environment "oneparchoices")
+          "choice")
+         ((string= environment "checkboxes")
+          "choice")
+         ((string= environment "oneparcheckboxes")
+          "choice")
          ((string= environment "subparts")
           "subpart")
          ((string= environment "subsubparts")
@@ -94,6 +102,10 @@
    (LaTeX-add-environments
     '("solution" [ "Height" ])
     '("select")
+    '("choices" LaTeX-env-item)
+    '("oneparchoices" LaTeX-env-item)
+    '("checkboxes" LaTeX-env-item)
+    '("onepaircheckboxes" LaTeX-env-item)
     '("solutionorbox" [ "Height" ])
     '("solutionorlines" [ "Height" ])
     '("solutionordottedlines" [ "Height" ])
@@ -104,7 +116,7 @@
     '("subsubparts" LaTeX-env-item))
 
    ;; Tell AUCTeX about special environments:
-   (let ((envs '("questions" "parts" "subparts" "subsubparts")))
+   (let ((envs '("questions" "parts" "subparts" "subsubparts" "choices" "oneparchoices" "checkboxes" "oneparcheckboxes")))
      (dolist (env envs)
        (add-to-list 'LaTeX-item-list
                     (cons env 'LaTeX-exam-insert-item))))