diff --git a/messages/uniworx/de.msg b/messages/uniworx/de.msg
index 8878ff631..f3fda7276 100644
--- a/messages/uniworx/de.msg
+++ b/messages/uniworx/de.msg
@@ -150,7 +150,7 @@ CourseAllocationMinCapacity: Minimale Teilnehmeranzahl
 CourseAllocationMinCapacityTip: Wenn der Veranstaltung bei der Zentralanmeldung weniger als diese Anzahl von Teilnehmern zugeteilt würden, werden diese stattdessen auf andere Kurse umverteilt
 CourseAllocationMinCapacityMustBeNonNegative: Minimale Teilnehmeranzahl darf nicht negativ sein
 CourseAllocationInstructions: Anweisungen zur Bewerbung
-CourseAllocationInstructionsTip: Wird den Studierenden angezeigt, wenn sie diese Veranstaltung in ihre Präferenzliste aufnehmen
+CourseAllocationInstructionsTip: Wird den Studierenden angezeigt, wenn diese sich für Ihre Veranstaltung bewerben
 CourseAllocationApplicationTemplate: Bewerbungsvorlagen
 CourseAllocationApplicationText: Text-Bewerbungen
 CourseAllocationApplicationTextTip: Sollen die Studierenden Bewerbungen (ggf. zusätzlich zu abgegebenen Dateien) als unformatierten Text einreichen?
diff --git a/src/Handler/Home.hs b/src/Handler/Home.hs
index 881ad8eac..87d36f53a 100644
--- a/src/Handler/Home.hs
+++ b/src/Handler/Home.hs
@@ -206,10 +206,13 @@ homeUpcomingExams uid = do
           E.where_ $ E.exists $ E.from $ \participant ->
             E.where_ $ participant E.^. CourseParticipantUser   E.==. E.val uid
               E.&&.    participant E.^. CourseParticipantCourse E.==. course E.^. CourseId
-          E.where_ $ E.isJust (exam E.^. ExamRegisterFrom)
-                     E.&&.     exam E.^. ExamRegisterFrom  E.<=. E.just (E.val fortnight)
-          E.where_ $ E.isJust (exam E.^. ExamEnd)
-                     E.&&.     exam E.^. ExamEnd           E.>=. E.just (E.val now)
+          let regFromJustFortnight =
+                E.isJust (exam E.^. ExamRegisterFrom)
+                E.&&.     exam E.^. ExamRegisterFrom  E.<=. E.just (E.val fortnight)
+              regToJustNow =
+                E.isJust (exam E.^. ExamEnd)
+                E.&&.     exam E.^. ExamEnd           E.>=. E.just (E.val now)
+          E.where_ $ regFromJustFortnight E.&&. regToJustNow
           return (course, exam)
         dbtRowKey = queryExam >>> (E.^. ExamId)
         dbtProj r@DBRow{ dbrOutput } = do