diff options
| -rw-r--r-- | src/operationnull/pages.scm | 5 | ||||
| -rw-r--r-- | src/operationnull/site.scm | 1 |
2 files changed, 6 insertions, 0 deletions
diff --git a/src/operationnull/pages.scm b/src/operationnull/pages.scm index 42c9231..319199a 100644 --- a/src/operationnull/pages.scm +++ b/src/operationnull/pages.scm @@ -1,6 +1,7 @@ (define-module (operationnull pages) #:export (index-content contact-content + e404 gold-content)) @@ -37,6 +38,10 @@ (li (b "IRC: ") "@ Isaz @ libera.chat") (li (b "matrix: ") "@bdunahu:tchncs.de")))) +(define e404 + '(article (h2 "403/404 Error") + (p "The requested page does not exist, or you do not have access."))) + (define gold-content '(article (h2 "More Worthless than Gold") (div (@ (class "date")) diff --git a/src/operationnull/site.scm b/src/operationnull/site.scm index ad63b51..f1acfce 100644 --- a/src/operationnull/site.scm +++ b/src/operationnull/site.scm @@ -29,6 +29,7 @@ (blog #:theme main-theme #:prefix "/posts/" #:collections %blog-collection) + (static-page e404 "/404.html" "404 Error") (static-page gold-content "/gold.html" "More Worthless than Gold") (atom-feed #:file-name "atom.xml" #:subtitle "Recent Posts") |