focks
/
lspx
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

updated backtrace template

This commit is contained in:
a. fox 2024-01-24 09:18:02 -05:00
parent 0ec453f86b
commit a17db42f58
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
errors.lisp
View File

@ -32,7 +32,7 @@ html {
white-space: pre-line;
background: #505A5B;
color: #DCEDFF;
font-family: Chalkboard, Calibri, Sans Serif;
font-family: Chalkboard, Comic Sans MS, Calibri, Sans Serif;
}
a {
@ -45,7 +45,7 @@ p {
:test #'string=)
(deftemplate "Internal--BackTrace" (inner)
(format nil "<!DOCTYPE html><head><style>~A</style></head><html><body><p>~A</p></body></html>"
(format nil "<!DOCTYPE html><head><title>LSPX Error - Backtrace</title><style>~A</style></head><html><body><p>~A</p></body></html>"
+backtrace-html-style+ inner))
(defmacro with-printable-backtrace (&body body)