diff --git a/dev.metalisp.survey.asd b/dev.metalisp.survey.asd
index e9892c9..f2c5427 100644
--- a/dev.metalisp.survey.asd
+++ b/dev.metalisp.survey.asd
@@ -2,7 +2,7 @@
 
 (defsystem "dev.metalisp.survey"
   :description "A simple survey"
-  :version "0.2.4"
+  :version "0.2.5"
   :author "Marcus Kammer <marcus.kammer@metalisp.dev>"
   :source-control "git@git.sr.ht:~marcuskammer/dev.metalisp.survey"
   :licence "MIT"
diff --git a/src/survey.lisp b/src/survey.lisp
index db537b4..3f731f1 100644
--- a/src/survey.lisp
+++ b/src/survey.lisp
@@ -95,8 +95,11 @@
 	   (loop for row in sus-results
              do (:tr (mapcar (lambda (data) (:td data)) row)))))))
 
+(defparameter *special-questionnaire-types* '(:sus :ueq :visawi :mucue))
+
 (defun results-html (results)
-  (loop for (type data) on results by #'cddr unless (eq type :sus)
+  (loop for (type data) on results by #'cddr
+        unless (member type *special-questionnaire-types* :test 'eq)
         do (spinneret:with-html (:h3 :class "py-1" (format nil "~a" type))
              (:div :class "container"
                    (loop for row in (group-in-chunks data)