diff --git a/nomen-est-omen/generating-course-data.lisp b/nomen-est-omen/generating-course-data.lisp
index 87d3de22d3cb4e3b87681bf51c02a3a7ed09d911..89cbd492a29ad4883afbc12442a8038cc80fcbb9 100644
--- a/nomen-est-omen/generating-course-data.lisp
+++ b/nomen-est-omen/generating-course-data.lisp
@@ -31,7 +31,7 @@
     (dolist (key '(first second third fourth))
       (let ((record-part (or (funcall key record-parts) ""))
             (config-value (getf config (intern (symbol-name key) "KEYWORD"))))
-        (when value
+        (when config-value
           (setf (gethash config-value record)
                 record-part))))
     (setf record (ensure-matriculation-number-is-integer record))
diff --git a/nomen-est-omen/nomen-est-omen b/nomen-est-omen/nomen-est-omen
index 4c0061daaf49216be317d8ad3e9dd8a89e139601..8061ff8502557fd64efffee37ddb4e4df1689b5b 100755
Binary files a/nomen-est-omen/nomen-est-omen and b/nomen-est-omen/nomen-est-omen differ