diff --git a/src/views/survey.lisp b/src/views/survey.lisp
index 449b507..729e6ab 100644
--- a/src/views/survey.lisp
+++ b/src/views/survey.lisp
@@ -1,8 +1,8 @@
 (in-package :ml-survey/views)
 
 (defun survey (survey &optional results)
-  (check-type survey ml-survey:survey)
   "Generates the view to show the survey created."
+  (check-type survey ml-survey:survey)
   (with-page (:title "Survey Details")
     (navbar-en)
     (:section :class "container"