|
123456789101112131415 |
- #|
-
- src/web/exception.lisp
-
- Error Pages
-
- |#
-
- (in-package #:cl-deck-builder2.web)
-
- ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
- (defmethod on-exception ((app <web>) (code (eql 404)))
- (declare (ignore app))
- (merge-pathnames #P"_errors/404.html"
- *template-directory*))
|