diff --git a/messages/uniworx/de.msg b/messages/uniworx/de.msg index 7228f0612..d79a825ca 100644 --- a/messages/uniworx/de.msg +++ b/messages/uniworx/de.msg @@ -1523,6 +1523,7 @@ AllocationActive: Aktiv AllocationName: Name AllocationAvailableCourses: Kurse AllocationAppliedCourses: Bewerbungen +AllocationNumCoursesAvailableApplied available@Int applied@Int: Sie haben sich bisher für #{applied}/#{available} #{pluralDE applied "Kurs" "Kursen"} beworben AllocationTitle termText@Text ssh'@SchoolShorthand allocation@AllocationName: #{termText} - #{ssh'}: #{allocation} AllocationShortTitle termText@Text ssh'@SchoolShorthand ash@AllocationShorthand: #{termText} - #{ssh'} - #{ash} AllocationDescription: Beschreibung diff --git a/src/Handler/Allocation/Show.hs b/src/Handler/Allocation/Show.hs index bb6410ef0..0029581b7 100644 --- a/src/Handler/Allocation/Show.hs +++ b/src/Handler/Allocation/Show.hs @@ -96,4 +96,6 @@ getAShowR tid ssh ash = do |] let daysToRegistrationStart = assertM (>0) $ (`diffUTCTime` now) <$> allocationRegisterFrom allocationInfoModal = modal [whamlet|_{MsgMenuAllocationInfo}|] $ Left $ SomeRoute InfoAllocationR + numCourses = length courses + numAppliedCourses = lengthOf (folded . _2 . _Just) courses $(widgetFile "allocation/show") diff --git a/templates/allocation/show.hamlet b/templates/allocation/show.hamlet index 5d5462da4..3f0e97fe1 100644 --- a/templates/allocation/show.hamlet +++ b/templates/allocation/show.hamlet @@ -78,6 +78,9 @@ $if not (null courseWidgets)
_{MsgAllocationPriorityTip}
_{MsgAllocationPriorityRelative}
_{MsgApplicationEditTip} + $if is _Just muid +
+ _{MsgAllocationNumCoursesAvailableApplied numCourses numAppliedCourses}