Presentasjons sortering

3 commits
* Oppdatert midje
* Optional :date lagt på Presentation
 * Sortering på date og title
 * Fikset tester som feiler
 * Lagt til nye tester
* Endret mine egne datoer
Ok, kan for eksempel skrives om til:
```(or (let [num (compare date-2 date-1)] (when-not (= 0 num) num) ...)```
Eller har du et bedre forslag? Synes zero->nil blir letter å lese i den sammenhengen.