|
|
@ -190,10 +190,10 @@ |
|
|
|
(append (auth:auth-user-data) |
|
|
|
(append (auth:auth-user-data) |
|
|
|
`(:alert ,alert |
|
|
|
`(:alert ,alert |
|
|
|
:storage-files |
|
|
|
:storage-files |
|
|
|
,(nera:latest-storage-editted-files 10 t) |
|
|
|
,(nera:latest-storage-editted-files 5 t) |
|
|
|
:pages ,(nera:latest-editted-pages 10 t) |
|
|
|
:pages ,(nera:latest-editted-pages 5 t) |
|
|
|
:archive-entries |
|
|
|
:archive-entries |
|
|
|
,(nera::latest-archive-editted-entries 10 t) |
|
|
|
,(nera::latest-archive-editted-entries 5 t) |
|
|
|
:system-data ,(nera:system-data))))) |
|
|
|
:system-data ,(nera:system-data))))) |
|
|
|
;; Not Authorised |
|
|
|
;; Not Authorised |
|
|
|
(progn (utils:set-alert "You are not logged in." "error") |
|
|
|
(progn (utils:set-alert "You are not logged in." "error") |
|
|
|