fraport/fradrive-old
Archived
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

feat(allocations): additional info and explanation for participants

Browse Source
This commit is contained in:
Gregor Kleen 2019-08-30 09:12:50 +02:00
parent 0427658314
commit 38949cfe0d
5 changed files with 18 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
messages/uniworx/de.msg
View File

@ -1522,7 +1522,7 @@ AllocationRegister: Bewerbung
AllocationRegisterClosed: Die Zentralanmeldung ist aktuell geschlossen. AllocationRegisterClosed: Die Zentralanmeldung ist aktuell geschlossen.
AllocationRegisterOpensIn difftime@Text: Die Zentralanmeldung öffnet voraussichtlich in #{difftime} AllocationRegisterOpensIn difftime@Text: Die Zentralanmeldung öffnet voraussichtlich in #{difftime}
AllocationStaffAllocationFrom: Bewertung der Bewerbungen ab AllocationStaffAllocationFrom: Bewertung der Bewerbungen ab
AllocationStaffAllocation: Bewerbungsbewertung AllocationStaffAllocation: Bewertung der Bewerbungen
AllocationProcess: Platzvergabe AllocationProcess: Platzvergabe
AllocationNoApplication: Keine Bewerbung AllocationNoApplication: Keine Bewerbung
AllocationPriority: Priorität AllocationPriority: Priorität
@ -1588,3 +1588,5 @@ SchoolAdmin: Admin
SchoolLecturer: Dozent SchoolLecturer: Dozent
SchoolEvaluation: Kursumfragenverwaltung SchoolEvaluation: Kursumfragenverwaltung
SchoolExamOffice: Prüfungsamt SchoolExamOffice: Prüfungsamt
ApplicationEditTip: Während des Bewerbungszeitraums können eigene Bewerbungen beliebig angepasst und auch wieder zurückgezogen werden.

4
src/Handler/Allocation/Show.hs
View File

@ -46,8 +46,8 @@ getAShowR tid ssh ash = do
let title = MsgAllocationTitle (mr . ShortTermIdentifier $ unTermKey allocationTerm) (unSchoolKey allocationSchool) allocationName let title = MsgAllocationTitle (mr . ShortTermIdentifier $ unTermKey allocationTerm) (unSchoolKey allocationSchool) allocationName
shortTitle = MsgAllocationShortTitle (mr . ShortTermIdentifier $ unTermKey allocationTerm) (unSchoolKey allocationSchool) allocationShorthand shortTitle = MsgAllocationShortTitle (mr . ShortTermIdentifier $ unTermKey allocationTerm) (unSchoolKey allocationSchool) allocationShorthand
staffInformation <- anyM courses $ \(view $ resultCourse . _entityVal -> Course{..}) -> -- staffInformation <- anyM courses $ \(view $ resultCourse . _entityVal -> Course{..}) ->
hasReadAccessTo $ CourseR courseTerm courseSchool courseShorthand CApplicationsR -- hasReadAccessTo $ CourseR courseTerm courseSchool courseShorthand CApplicationsR
mayRegister <- hasWriteAccessTo $ AllocationR tid ssh ash ARegisterR mayRegister <- hasWriteAccessTo $ AllocationR tid ssh ash ARegisterR
(registerForm, registerEnctype) <- generateFormPost . renderAForm FormStandard . allocationRegisterForm $ allocationUserToForm . entityVal <$> registration (registerForm, registerEnctype) <- generateFormPost . renderAForm FormStandard . allocationRegisterForm $ allocationUserToForm . entityVal <$> registration
let let

18
templates/allocation/show.hamlet
View File

@ -24,15 +24,14 @@ $newline never
_{MsgAllocationRegisterFrom} _{MsgAllocationRegisterFrom}
<dd .deflist__dd> <dd .deflist__dd>
^{formatTimeRangeW SelFormatDateTime fromT allocationRegisterTo} ^{formatTimeRangeW SelFormatDateTime fromT allocationRegisterTo}
$if staffInformation $maybe fromT <- allocationStaffAllocationFrom
$maybe fromT <- allocationStaffAllocationFrom <dt .deflist__dt>
<dt .deflist__dt> $maybe _ <- allocationStaffAllocationTo
$maybe _ <- allocationStaffAllocationTo _{MsgAllocationStaffAllocation}
_{MsgAllocationStaffAllocation} $nothing
$nothing _{MsgAllocationStaffAllocationFrom}
_{MsgAllocationStaffAllocationFrom} <dd .deflist__dd>
<dd .deflist__dd> ^{formatTimeRangeW SelFormatDateTime fromT allocationStaffAllocationTo}
^{formatTimeRangeW SelFormatDateTime fromT allocationStaffAllocationTo}
$# TODO show datetime of automatic allocation $# TODO show datetime of automatic allocation
$# $#
@ -78,6 +77,7 @@ $if not (null courseWidgets)
<div .allocation__explanation .allocation__label> <div .allocation__explanation .allocation__label>
<p>_{MsgAllocationPriorityTip} <p>_{MsgAllocationPriorityTip}
<p>_{MsgAllocationPriorityRelative} <p>_{MsgAllocationPriorityRelative}
<p>_{MsgApplicationEditTip}
<div .allocation__courses> <div .allocation__courses>
$forall courseWgt <- courseWidgets $forall courseWgt <- courseWidgets
^{courseWgt} ^{courseWgt}

2
templates/allocation/show.lucius
View File

@ -1,4 +1,4 @@
.allocation__label { .allocation__label, .allocation__explanation {
color: var(--color-fontsec); color: var(--color-fontsec);
font-style: italic; font-style: italic;
} }

2
templates/i18n/allocation-info/de.hamlet
View File

@ -33,6 +33,8 @@ $newline text
zuweisen, zwischen "dieser Kurs wäre meine erste Wahl" zuweisen, zwischen "dieser Kurs wäre meine erste Wahl"
und "diesen Kurs besuche ich auf keinen Fall". und "diesen Kurs besuche ich auf keinen Fall".
Es kann auch mehreren Kursen die gleiche Priorität eingeräumt werden. Es kann auch mehreren Kursen die gleiche Priorität eingeräumt werden.
<p>
Bewerbungen für und Prioritisierung der Kurse können innerhalb des Bewerbungszeitraums beliebig angepasst und zurückgezogen werden.
<p> <p>
Studierende können auch mehr als einen Platz Studierende können auch mehr als einen Platz
in verschiedenen Kursen einer Zentralanmeldung anfordern, in verschiedenen Kursen einer Zentralanmeldung anfordern,