cage
/
tinmop
mirror of https://codeberg.org/cage/tinmop/
1
0
Fork 0
Code Issues

- fixed test for conditional macro call.

This commit is contained in:
cage 2023-12-07 17:31:33 +01:00
parent e255f87eaf
commit c613cefa13
1 changed files with 17 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/tui-utils.lisp
View File

@ -503,7 +503,8 @@ latter has a length equals to `total-size'"))
(defmacro with-notify-errors (&body body)
#+(or debug-mode debug-tui-errors) `(progn ,@body)
#-debug-mode `(handler-case
#-(or debug-mode debug-tui-errors)
`(handler-case
(progn
,@body)
(error (e)
@ -513,8 +514,9 @@ latter has a length equals to `total-size'"))
nil)))
(defmacro with-print-error-message (&body body)
#+debug-mode `(progn ,@body)
#-debug-mode `(handler-case
#+(or debug-mode debug-tui-errors) `(progn ,@body)
#-(or debug-mode debug-tui-errors)
`(handler-case
(progn
,@body)
(error (e)